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lie SWi2@ - ABORT AFTER 20 ERRORS 

SWil - pestret gpERST ION COUNT 

SW10 - BELL RROR 

SWS - LOOP ON nar 

SW8 - LOOP ON TEST IN SWITCHES 0-7 

3.4 RUN TIME 

FIRST PASS :2S MINUTES 
SUBSEQUENT PASSES 3:15 MINUTES 


4.0 OPERATING PROCEDURES 
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: 
1g THE PROGRAM IS EXECUTED BY STARTING AT THE APPROPIATE ADDRESS. 
189 4.1 *SOFTWARE’ SWITCH REGISTER 
131 IF THE PROGRAM S BEING RUN ON A SWITCHLESS PROCESSOR (I.E., AN 11/04 
132 OR 11/34) THE AM WILL DETERMINE THAT THE HARDWARE SWITCH 
133 REGISTER IS NOT SENT WILL A 'SOFTWARE’ SWITCH 
134 REGISTER. THE SET OF THE "SOF TWARE’ SWITCHES ARE CONTROLLED 
13e PROGRON WIL SRO NE MECH ROD EOC AP ARY TIME EXCEPT WHEN THE 
137 PROGRAM Ht brs HI PR ORTTY PROCESSING AN RKO& INTERRUPT. T 
138 ’SOFTWARE’ SWITCH VALUES ARE ENTERED AS AN OCTAL NUMBER IN RESPONSE 
139 TO THE PROMPT FROM THE SWITCH ENTRY ROUTINE: 
141 SWR = NNNNNN NEW =’ 
i EES TERE Sa HST a eh BRE ESRB Ind SeRSEO Ene HE acouraen 
14S SUF AND BNTROL US u’ Tag MAY BE USED TO CORRECT TYPING 
146 RRORS DURING co TCN ENTRY’ 
148 ON PROCESSORS WITH HARDWARE SWITCH REGISTERS, THE ’SOFTWARE’ SWITCH 
149 REGISTER HAY THE PROGRAM FINDS ALL 16 SWITCHES 
1S0 UP’ BE TON: alt SWITCH REGISTER REFERENCES WILL BE TO THE 
151 ROE THIARE. REGTSTER AND THE PROCEDURES DESCRIBED ABOVE MUST BE 
152 FOLLOWED. 
164 4.2 CONTROL C (tC) OPERATION 
156 IF tC IS TYPED AT ANY TIME DURING THE PROGRAM EXECUTION THE 
157 PROGRAM IS HALTED IMMEDIATELY. IF A MONITOR IS PRESENT (XXDP CHAIN 
158 2 THE PROGRAM RETURNS CONTROL TO THE MONITOR. IF NO MONITOR 
159 is ‘pres THE CPU IS HALTED. DEPRESSING THE CONTINUE KEY WILL DO 
160 A PROGRAM TaeSTART. 
ibe 4.3 CONTROL S (tS) OPERATION 
164 IF tS IS TYPED AT ANY TIME THE PROGRAM WILL GO INTO A STALL LOOP 

165 UNTIL A CONTROL @ (tQ) IS TYPED. 

167 4.4 CONTROL @ (#Q@) OPERATION 
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IF A tS HAS BEEN Tyree, TYPING THE f@ CANCELS THE STALL 
INITIATED BY THE tS. 


5.0 PROGRAM DESCRIPTION 


NNNSNO 
fWre-ow 


*#*TYPE C INSTRUCTION’S DRIVE MESSAGES 
TEST 1 READ DATA SEEK MESSAGE 


CLEAR T Reofaansaric WITH A SUBSYSTEM CLEAR. PUT TH 
CONTROLLER Re DIAGNO C MODE . ISSUE A READ DATA TO AN 
RKOb, IN 24 SECTOR FORMAT LINDER 1777, HEAD 7, DRIVE 
7, WORD COUNT 177777. CLOCK. tN THE SEEK’ MESSAGE’ AND 
naKE SURE IT IS GENERATED PROPERLY. 


TEST 2 WRITE DATA SEEK MESSAGE 


CLEAR RK611 CONTROLLER WITH A CONTROLLER CLEAR. PUT 
CONTROLLER IN MAINTENANCE MODE. ISSUE A WRITE DATA OF 
ONE WORD TO AN RKO& IN 24 SECTOR FORMAT, CYLINDER 1777, 
TRACK 7, DRIVE 7. CLOCK IN SEEK MESSAGE. CHECK IF 
PROPER MESSAGE IS ASSEMBLED. 


LWNM-OWONOTM LW OWONM 


TEST 3 SEEK MESSAGE FOR WRITE CHECK 


6 
7 CLEAR RK611 CONTROLLER WITH A CONTROLLER CLEAR. 

PUT CONTROLLER IN DIAGNOSTIC MODE. ISSUE A WRITE CHECK 
g OF 1 WORD TO AN RKOG IN 24 SECTOR FORMAT, 
0 CYLINDER 1777, HEAD 7, DRIVE 7. CLOCK 
1 IN SEEK COMMAND. MAKE SURE CORRECT MESSAGE 
e Is RESEMBLED. 


TEST 4 READ DATA CLEAR MESSAGE 


CLEAR THE RK611 WITH. a CONTROLLER CLEAR. PUT THE 
CONTROLLER. ON N_OIAGNOS TIC MODE. ISSUE A READ DATA To A 
RK KO6, IN R FORMAT, CYLINDER 1777 HEAD 7 DRIVE 
WORD Eount 177777. CLOCK IN THE SEEK MESSAGE A 
CLEAR MESSAGE AND MAKE SURE THE CLEAR RESSAGE IS CORRECT 


TEST S WRITE DATA AND DRIVE CLEAR MESSAGE 


CLEAR RK611 CONTROLLER WITH A CONTROLLER CLEAR. PUT 
CONTROLLER IN MAINTENANCE MODE. ISSUE A WRITE DATA OF 
ONE W WORD TO AN RKOG IN 24 SECTOR FORMAT, CYLINDER 1777 
TRACK 7 DRIVE 7 CLOCK IN SEEK MESSAGE AND ORIVE CLEAR 
CHECK If PROPER DRIVE CLEAR MESSAGE IS ASSEMBLED. 


fururu 
TUN eee ee OO 
Het tet et ST TO hr ott tr ptat thet owt, bet, tT pr tat thet eto pet tr prt nt tet =a 
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TEST & DRIVE CLEAR MESSAGE FOR WRITE CHECK 
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6 SEQ 0006 


CLEAR RK611 CONTROLLER WITH A CONTROLLER CLEAR 

PUT CONTROLLER IN DIAGNOSTIC MODE . ISSUE A WRITE 

GE CNOER 1 BORO LEAD 7 SRive 7. SeR —— 

THROUGH SEEK MESSAGE AND CLOCK IN DRIVE CLEAR. 
MAKE SURE CORRECT MESSAGE rt ASSEMBLED. 


rc 


**HEADER GENERATION 


TEST 7 


TEST 10 


TEST 11 


TEST 12 


HEADER GENERATION (PART 1) 

CLEAR THE RK611 WITH A CONTROLLER CLEAR. PUT THE 
CONTROLLER IN DIAGNOSTIC MODE. ISSUE A READ DAT 
WORD FOR AN RKOG I TOR FORMAT 

SECTOR 0. CLOCK THROUGH SEEK AND DR 


CHECK MA + a REGISTER 2 AND MA 
T a HAT THE HEADER IS CORRECT. 


| nd 
zee 


HEADER GENERATION (PART 2) 


CLEAR THE RK611 CONTROLLER WITH A CONTROLLER C 
THE Py ae rh. 8) as TIC Ae F SSUE A_RE 
1 WORD FOR AN RK 26 SECTOR FORMAT, CYLI 
0, SECTOR O. Crock THROUGH SEEK AND DRIVE CLE 
CHECK MAINTENANCE REGISTER 2 AND MAINTENANCE R 
TO MAKE THAT THE HEADER IS CORRECT. REPEAT FOR HEAD 


HEADER GENERATION (PART 3) 


LEAR THE RKBLI CONTROLLER WITH A CONTROLLER CLEAR. PUT 
GRE, GONS POR an Be ance SeCOR-rotnel™ EyMTRBER fe Ge 
0, SECTOR 5° CLOCK THROU SEEK AND DRIVE CLEAR MESSAGE 
CHECK MAINTENANCE REGISTER 2 MAINTENA ST 
TO MAKE SURE HEADER IS CORRECT. REPEAT FOR SECTORS 1-25 


HEADER GENERATION (PART 4) 


CLEAR THE RK611 CONTROLLER WITH A CONTROLLER CLEAR. PUT 
THE CONTROLLER IN DIAGNOSTIC MODE. ISSUE A READ DATA OF 
ON a te ae AN — AY ? = SECTOR FORMAT, CYLINDER one 
HEAD O TOR O CLOCK HROUGH SEEK AND’DRIVE CLEAR 
MESSAGES, CHECK MAINTENANCE REGISTER 2 AND MAINTENANCE 
BER STER 3 TO MAKE SURE HEADER IS CORRECT. REPEAT FOR 2 
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##NPR TRANSFER FOR WRITE DATA 


282 
283 TEST 13 WRITE DATA NPR TRANSFER 
28S CLEAR RK611 CONTROLLER WITH A CONTROLLER CLEAR. PUT 
egb CONTR L R IN oftRIN TENANCE MQDE ISSUE @ WRITE DATA oF 

7 ~ ’ : GR FORMAT 
S88 LROE cho € met ge “it " EK AHO, GRAVE Che BR nestace 
531 LATE. DOES NO UR. READ BACK 66 WORDS on VERIFY THEY 
293 
eo *#*HEADER RECOGNITION TESTS 
296 
297 TEST 14 WRITE DATA HEADER RECOGNITION 
239 CLEAR THE RK611 CONTROLLER WITH A CONTROLLER CLEAR. PUT 
300 CONTROLER IN MAINTENANCE MODE . ISSUE A WRITE DATA OF OF ON 
301 WOR 0 ong AN RK KO6 IN 26 SECTOR FORFAR CY LINDE Q, 
302 SEC OR 0. CLOCK IN BOTH SEEK A ORI AR MESCAGES. 
303 STmULAT A SEC $6R PULSE AND A HERDER W The AE FOLLOWING 
305 
306 oooo00 
307 140000 
306 140000 
316 MAKE SURE WRITE GATE SETS SHOWING CORRECT HEADER RECOGNI 
3le 
313 
315 TEST 1S SECTOR PULSE DETECTION FOR WRITE DATA 
317 CLEAR THE RK611 CONTROLLER WITH A CONTROLLER CLEAR. PUT 
318 GORD TO-BW &k IN MAINTEN NANCE MODE ISSUE A WRITE DATA OF ONE 
320 CTOR C K NB PA SEEK AND’ DRIVE ot EAR SSAGES. 
gel 3 MULAT “AN nie Bue Se AnD A APPR WITH THE FOLLOWING 
323 
326 tdo000 
328 MAKE SURE WRITE GATE DOES NOT SET. 
330 
331 TEST 16 SECTOR INCREMENT 
333 CLEAR THE RK611 CONTROLLER WITH A CONTROLLER CLEAR. PUT 
334 CONTROLLER IN MAINTENANCE MODE. ISSUE A WRITE DATA OF O 


TO AN RKO6 IN 26 SECTOR FORMAT, CYLINDER O, HEAD O, 
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TEST 17 


TEST 20 


TEST 21 


TEST 22 


2 SEQ 0008 


SECTOR O. 
SIMULATE SECTOR PULSE 
THAT WRITE GATE SETS, 


REPEAT FOR SECTOR 1-24. 


CLOCK IN BOTH SEEK AND DRIVE CLEAR . 
AND PROPER HEADER, MAKE SURE 


TRACK INCREMENT 


CLEAR THE RK611 CONTROLLER WITH A CONTROLLER CLEAR. PUT 

CONTROLLER IN MAINTENANCE MODE. ctpoue 8 WRITE DATA OF O 
TO AN RKO& IN 26 SECTOR FORMAT, agai INDER HEAD O 

SECTOR 25. CLOCK IN BOTH SEEK’ AND DRIVE Or ee MESSAGES. 
SIMULATE SECTOR PULSE AND PROPER HEADER, MAKE SURE 

THAT WRITE GATE SETS. 

CYLINDER INCREMENT 

CLEAR THE RK611 CONTROLLER WITH A CONTROLLER CLEAR. PUT 

CONTROLLER IN MAINTENANCE MODE. ISSUE A WRITE DATA OF O 
TO AN RKOG IN 26 SECTOR FORMAT, CYLINDER 0, HEAD 2 

SECTOR es. CLOCK IN BOTH SEEK’AND DRIVE CLEAR MESSAGES. 
STMULAT SECTOR PULSE AND PROPER HEADER, MAKE SU 


T WRITE GATE SETS. 


REPEAT FOR CYLINDER = 1-632. 


BAD SECTOR ERROR (PART 1) 


CLEAR THE RK611 CONTROLLER WITH A CONTROL. ER CLEAR. PUT 
CONTROLLER IN MAINTENANCE MODE. ISSUE A WRITE DATA OF 
ONE WORD TO AN RK 06. IN. ee SECTOR FORMAT CYLINDER 0 
HEAD 0, SECTOR O. K IN BOTH SEEK AND DRIVE CLEAR 
MESSAGES. SIMULATES ‘y gfe OR PULSE AND A HEADER WITH 
THE FOLLOWING DATA: 

oooo00 

040000 

040000 


ror SURE BAD SECTOR ERROR SETS. CHECK THAN DISK ADDRES 


S NOT INCREMENTED 


BAD SECTOR ERROR (PART 2) 


CLEAR THE RK611 CONTROLLER WITH A_ CONTROLLER CL PUT 
CONTROLLER ae. eae E MO A WRITE DA ate OF 
ONE W a fag TO AN RKO& IN 26 SECTOR FORMAT, CYLINDER 

HEAD O SECTOR O. CLOCK IN BOTH SEEK AND DRIVE C CLEAR 
MESSAGES. SIMULATE A SECTOR PULSE AND A HEADER WITH 
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TEST 23 


TEST 24 


TEST eS 


TEST 26 


9 SEG 0009 
THE FOLLOWING DATA: 
oo0000 
100000 
100000 
MAKE BAD SECTOR ERROR SETS. CHECK THAT DISK ADDR 
IS NOT INCREMENTED. — 


OPERATION INCOMPLETE 


CLEAR RK611 CONTROLLER WITH A CONTROLLER CLEAR. PUT 

CONTROLLER IN MAIN A WRITE DATA OF 
RKO& IN 24 SEC T, CYLINDER 1253, 

HEAD 2 23. CLOCK IN BOTH SEEK AND ORIVE CLEAR 

MESSAGES. SIMULATE A SECT 32 SECTORS WITH 

1 BIT DIFFERENT IN 30 BITS OF OPI DETERMININATION. ALL 

SIMULATED HEADERS, HAVE GOOD HEADER VRC. MAKE SURE ONLY 


OPERATION INCOMPLETE AND CONTROLLER ARE THE ONLY ERRORS 


HEADER VRC 


CLEAR RK611 CONTROLLER WITH A CONTROLLER CLEAR. 
CONTROLLER iN MAINTENANCE MODE. ISSUE A WRITE 
ONE WORD WITH CDT SET axed 

AD 2, SECTOR 23. CLOCK ORIV 


MESSAGES SIMULATE A SECTOR PULSE AND HEADER WITH BIT 0 
THE VRC INCORRECT. MAKE SURE ONLY HEADER VRC_AND 
CONTROLER Ee ARE THE ONLY ERRORS SET. REPEAT FOR 


BAD SECTOR ERROR AND HEADER VRC 


CLEAR RK611 CONTROLLER WITH A CONT Eee CLEAR. PUT 
ONE WORD} ag NTENANCE MODE. ISSUE A WRITE DATA OF 


ONE TO RKO& IN 26 SECTOR FORMAT CYLINDER 300. 
HEAD 1, SECTOR 17, CLOCK IN BOTH SE AND DRIVE CLEAR 
MESSAGES. SIMULATE THE FOLLOWING SFEA ADER: 
000300 
940057 
040356 


MAKE SURE ONLY HEADER VRC ERROR SETS. 
GOOD HEADER AND PREVIOUS BSE 


CLEAR RK611 CONTROLLER WITH CONTROLLER CLEAR. 
CONTROLLER IN DIAGNOSTIC MODE. ISSUE A WRITE DATA OF 
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TEST 27 


TEST 30 


10 SEQ OO10 
ONE WORD TO AN RKO& IN 26 SECTOR FORMAT, CYLINDER ; 
HEAD 0, SECTOR 1. CLOCK THROUGH SEEK AND DRIVE CLEAR 
MESSAGES. SIMULATE A SECTOR PULSE AND A HEADER OF THE 
FOLLOWING 3 WORDS WITH A BAD SECTOR INDICATION: 

000100 

g49009 

040100 
MAKE SURE NO ERROR IS REPORTED AND WRITE GATE DOES NOT 
SET apg inuL MULATE A SECTOR PULSE AND A HEADER OF THE FOLLOW 

000100 

140001 

140101 
MAKE SURE WRITE GATE SETS INDICATING THAT HEADER HAS 

N RECOGNIZED. 


GOOD HEADER AND PREVIOUS HVRC 
CLEAR RK611 CONTROLL 8 WITH A CONTROLLER CLEBR 
CONTROLLER 7 Wty TIC MODE. IS A WRI 
ONE WORD TO AN RKO IN 26 SECTOR YL 
SECTOR 1. K T 


HEAD O CLOCK THROUGH S 
MESSAGES. SIMULATE A SECTOR PULSE AND A HEADER 0 
FOLLOWING 3 WORDS WITH A BAD HEADER VRC: 
000200 
140000 
140000 
MAKE SURE NO 
SET. gl | 
FOLLOWING 3 WO 
000200 
140001 
140201 


MAKE SURE WRITE GATE SEES INDICATING THAT HEADER HAS 
BEEN RECOGNIZED. 


ERROR IS REPORTED AND WRITE GATE DOES NOT 
E MR adie PULSE AND A HEADER OF THE 


BAD SECTOR ERROR AND PREVIOUS HVRC 


CLEAR THE RK611 CONTROLLER WITH A CONTROLLER CLEAR. 
PUT CONTROLLER IN DIAGNOSTIC MODE. SUE A 
WRIT A OF WORD TO AN RKO6_IN 26 SECTOR 


E DAT 
FORMAT CYLINDER 400, HEAD 0, SECTOR 1. CLOCK THROUGH 
SEEK Al AGES. SIMULATE A SECTOR PULSE 
AND A HEADER VOF THE FOLLOWING 3 WORDS WITH A 


egnepeo RK611 Deke. 


Sue 


Ww 


WUTUT UU UU Unt 
PUTT ee 
WNR-OWONCULCWM-OwW 


mr 
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TEST 31 


TEST 32 


BAD HEADER VRC: 


740000 


140000 


Boks AG set.” SIMULATE A SECTOR PULSE BND A 


HEADER CONSISTING OF THE FOLLOWING 3 WORDS: 
et 
0001 
040401 


MAKE SURE BAD_SECTOR ERROR SETS AND HEADER VRC 
ERROR DOES NOT SET. 


HEADER VRC AND PREVIOUS BSE 


CLEAR RK611 CONTROLLER WITH A CONTROLLER CLEAR. 
CT TE CDATA CDR ONE HORG 10 AN RkDe IN Se SECT 

PRAT CHLERDER 140, , HERD 0 kOe IN |» cLOgk K THROUGH 
SEEK AND DRIVE CLEAR’ MESSAGES. SIMULATE A SECTOR PULSE 
AND 8 ADER OF THE FOLLOWING 3 WORDS WITH A HEADER 


yf oveid ee 
B4o140 
E Sune oft? ERROF IS Ri PORTER AND WRITE GAT 


DOESN STIMULATE A SECTOR PULSE AND 
HEADER  CORSISTING OF THE FOLLOWING THREE WORDS: 


140001 

140101 
MAKE SURE HEADER VRC ERROR SETS AND BAD SECTOR 
ERROR DOES NOT SET. 


OPI AND HVRC ON LAST HEADER 


CLEAR THE RK611 CONTROLLER WITH A CONTROLLER CLEAR. 
PUT CONTROLLER IN DIAGNOSTIC MODE. ISSUE A WRITE 

DATA NE WORD RKO6 IN 26 SECTOR FORMAT, 
CYLINDER eno HEAD 9, ECTOR 1. CLOCK THROUGH 

SEEK AND ORIVE CL SSAGES. SIMULATE A SECTOR PULSE 
AND 30 HEADERS CONSISTING OF THE FOLLOWING 3 WORDS: 


oo0240 
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SEQ 0012 


148888 


DOES AUT ser. SvMUCRTE A SrCYOR PULSE Bn A 


HEADER CONSISTING OF THE FOLLOWING THREE 


139908 


MAKE SURE HEADER VRC AND OPI ERROR SET. 


TEST 33 OPI AND PREVIOUS HEADER VRC (PART 1) 


pur ONTROLLER INI “BBG LER WITH A ConTRethen § 


AR. 
STIC MODE A_WR E 
RKO6_ IN 26 eS FOS FORMAT 

LOCK _ THROUGH 


L 
: T 
Os ee . 
AND 300, Fe CLEAR’ MESSAGES. SIMULATE A 


GHEE Best HEADERS CONSISTING OF THE 


THEN SIMULATE A 3 WORD HEADER CONSISTING ON 
THE FOLLOWING DATA: 


000300 
140000 
140200 


Boks AGT SET. S{MLLATE A SECTOR PULSE BND A 


HEADER CONSISTING OF THE FOLLOWING THREE WOR’ 


setae 
140300 


MAKE SURE HEADER VRC AND OPI ERRORS SET. 


TEST 34 OPI AND PREVIOUS HEADER VRC (PART 2) 


Ta THE RK611 CONTROLLER WITH A CONTROLLER CLEAR. 
ee ge ‘o yg IC MODE. ISSUE A WRITE 
AxOS in ee ee FORMAT, 


CYLINDER 4 WOE RD 10, "SECTOR THROUGH 
SEEK AND ORIVE CLE SSAGES. g RuLaTE Se oTOR 
PULSE ADS A HEADER CONSISTING OF THE FOLLOWING 


Sta ey RK611 psi 


LS crm. PRT4Y 
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TEST 35 


TEST 36 


TEST 37 


TEST 40 


13 SEQ 0013 
THREE WORDS HAVING A BAD HEADER VRC: 
000040 
140000 
140000 
SURE _NO ERROR IS REPORT ED AND WRITE GA 


MAKE 
DOES NOT SET. SIMULATE A SE 
HEADERS CONSISTING OF THE FOLL 


000040 
1400 
14004 
MAKE SURE HEADER VRC AND OPI ERRORS SET. 


BSE AND CONTROLLER ERROR 


HVRC AND CONTROLLER ERROR 


CLEAR RK611 CONTROLLER WITH A CONTROLLER CLEAR. 
PUT CONTE ED IN DIAGNOST ORs - ISSUE A WRITE DATA 


STIC 

OF 1 WORD TO AN RKO& IN CT 

eyLINDER 300 NERO -B NPR Gg. OUGH SEEK 
IVE CLEAR ME SAGES. SIMULA TOR PULSE 

AND HE WITH ERROR. URE CONTROLLER 

ERROR AND HVRC SET. CLEAR CONTROLLER AND MAKE SURE 

CONTROLLER ERROR RESETS. 


READ DATA AND HVRC ERROR 


SPSS RMRA! SEMTROGS RR BATE, MSBETPOLEER“SEBio oar 
BORD. TO 4 TOR F FORMAT 


HEAD SECTOR 0. CLOCK Thigouct SEEK 
VE Der 300, AESSAGES. SIMULATE A SECTOR PULSE 
AND A HEADER WITH A HVRC ERROR. MAKE SURE CONTROLLER 
ERROR AND HVRC SET. CLEAR CONTROLLER AND MAKE SURE 
CONTROLLER ERROR RESETS. 


WRITE CHECK AND HVRC 


ee eee ec I ET CE CE LE LO OE LO LL LL LL LLL A Oe 
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1t SES 0014 


H A CONTROLLER CLEAR. 
I ies (St A ae 


if CLEAR CONTROLLER 
iat 


#*ECC GENERATION TESTS 


TEST 41 


TEST 42 


TEST 43 


ECC INITIALIZATION 


CLEAR THE RK611 CONTROLLER WITH A CONTROLLER CLEAR. 
<e T CONTROLLER IN MG ged 1S MODE. ISSUE A WRITE 
DATA O WORDS TO AN RKOb, IN 26 SECTOR 

ae CYLINDER O, HEAD 0, SECTOR FF a THROUGH 


OOD HEADER. CLOCK THROUGH ONLY FO 
MAKE SURE THE ECC PATTERN 


ECC GENERATION (PART 1) 
CLEAR THE RKG11 CONTROLLER WITH A CONTROLLER CLEAR. 
PUT T CONTR ER IN DIAGNOSTIC MODE. ISSUE A WRITE 
D TO AN RKO6, IN 26 SECTOR 
FORMAT OF. TNER 0, HEAD 0. SECTOR O. CLOCK THROUGH 
DRIVE CLEAR MESSAGES. SIMULATE A SECTOR 
A GOOD HE CLOCK THROUGH ONLY THE 
FOLLOWING SIX WORDS "5 Roatae 
o0s001 
040040 
00 
00006 
ooo000 
oo 


CLOCK IN EACH BIT INDIVIDUALLY AND CHECK FOR PROPER ECC 
GENERATION AS SEEN THROUGH THE ECC PATTERN REGISTER. 


ECC GENERATION (PART 2) 


CLEAR THE RK611 CONTROLLER WITH A CONTROLLER CLEAR. 
PUT THE CONTROLL ER IN DIAGNOSTIC MODE. ISSUE A WRITE 
DATA OF ie WO ROS TO A N RKO&, IN 26 SECTOR 

FORMAT OF TNDER HEAD 0, SECTOR 0. CLOCK THROUGH 
SEEK AND DRIVE CLEAR MESSAGES. SIMULATE A SECTOR PULSE 


CO0e 
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AND A GOOD HEADER. CLOCK THROUGH ONLY THE FOLLOWING 


728 

729 SIX WORDS OF DATA: 

730 ove 

23a 133555 

3 ae 

53d 177777 

736 177777 

737 

539 

740 CLOCK IN EACH BIT INDIVIDUALLY AND CHECK FOR PROPER ECC 

cae GENERATION AS SEEN THROUGH THE ECC PATTERN REGISTER. 

743 

ta TEST 44 ECC WRITING 

ca eur THE RKGI1 Ppt WITH A CONTROLLER sae 

748 a OF 400 WORDS, “an RROD. In'ae SECTOR Fens 

ecg EYL INGER 0, He Pac ke BEES 4 OR 

a BB Frisia theebete ee Bc THEBES of Aca 

752 AND THE T' fhe TWO ECC WORDS 

753 ARE CORRECT nd sear DROPERLY. CHECK BUS ADDRESS, 

754 WORD COUNT, CYLINDER, TRACK, AND SECTOR. 

756 

757 

758 ¥*PARTIAL WRITE DATA 

763 

761 TEST 4S ZERO FILL ON WRITE DATA 

763 CLEAR THE RK 11 c TROL WITH A CONTROLLER CLEAR. 
IN + EGN 


re Sahai SBS ESRDE" Sante In ot SEtrok Pome 
767 BND TORIVE Oa, HERO Os =seeror QimuLaTE A See scr. 


76 THE fuG-€ec HORDS._ Sheck The SECTOR FOR ZERO PILL 


770 ae es SURE THE TWO ECC WORDS ARE MATTED N PROPERLY. 

a CHECK Sus ADDRESS, WORD COUNT, CYLINDER, TRACK, AND SECT 
773 

774 

a} #*18 BIT FORMAT WRITES 

777 

378 TEST 46 18 BIT WRITE DATA (PART 1) 

780 CLEAR THE RK611 CONTROLLER WITH A CONTROLLER CLEAR. 

781 PUT CONT NOaee a DIAGNOSTIC MODE. ISSUE A WRITE DATA 
782 OF 400 WORDS TO AN RKO& IN 24 SECTOR FORMAT 


783 CYLINDER 0, HEAD 0, SECTOR O. CLOCK THROUGH SEEK 
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jee] 
oo 
[ea] 


DDODDOWOWNDDOOOOMW 
TNR ee ee ee ee 
WN OWONOULCW-OWON 


Bee 
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NB R’E360°REAGER.~ CLOCK TRAOUCH 6 HORDS OF gaa 


VERIFY THAT TWO ZERO BITS ARE PRESENT FOR EACH WORD 


TEST 47 18 BIT WRITE DATA (PART 2) 


CLEAR THE RK611 CONTROLLER WITH A CONTROLLER CLEAR. 
ft 480 UoRDe oe IN pT gg MODE. ISSUE A WRITE DATA 
24 SECTOR FORMAT 
A SEC 


Site Oy HEED, DecBEETO™ Oy COE, THESUGH BEF 
AYTH Bab PART IY SET. Ck DER he RA wba” 


BITS ON SIMULATED DISK 


— PARITY ENAGLE 1S PRESENT PoR BUFFER 


TEST SO CLEAR BAD PARITY BUFFER 


THE SOLE PURPOSE OF THIS TEST 13 TO CLEAR BADPAR 
BUFFER AND REMOVE THE BAD PARITY 


TEST S51 18 BIT WRITE DATA (PART 3) 


CLEAR RK611 CONTROLLER WITH A CONTROLLER tt 
PUT CONTROLLER IN Ty gg Ue MODE. ISSUE A WRITE DATA 
400 _W T RKO6_IN 24 SECTOR FORMAT 


OF 400 WORDS TO AN 

uh The O, HEAD O, SECTOR 0. CLOCK THROUGH SEEK 

AND DRIVE CLEAR MESSAGES. SIMULATE A "Becton PULSE 
ADER. CLOCK THROUGH 400 18 BIT WORDS 


AND _THE 3e BIT Fee VERIFY THAT THE ECC IS 
WRITTEN CORRECTLY 
6.0 ERROR REPORTING 
THE GENERAL FORMAT OF ERROR REPORTS IS: 
OPERATION DESCRIPTION AND ERROR DESCRIPTION 
TEST ERROR 
NUM P 
XXXXXX_ _YYY 
EXPECT BCTUAL NF E a) uaa 
222Z2Z2Z =WWWWWW =ARAAAAA 
NOTE: or THAN ONE SET OF EXPECT/ACTUAL REGISTERS MAY BE 


NTED UT. OTHER PERTENANT INFORMATION MAY CONSIST 
oF Tho € THAN ONE WORD. 
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oar pale a INFORMATION MAY Conran A_WORD LABELED 
“BIT COUNT” COUNT IS REPORTED WHEN THE OPERATION BEING 


THIS 
PERFORMED INVOLVES CLOCKING THE CONTROLLER THROUGH ONE OR MORE 
OF THE VARIOUS FIELDS THAT MAKE UP THE PHYSICAL SECTOR FORMAT. 


THESE FIELDS (ALL VALUES GIVEN IN OCTAL) ARE: 


FIELD BITS WORDS 
HEADER PREAMBLE 400 20 
HEADER 60 

ad 100 4 
pare PREAMBLE 400 20 
(22(10) SECTOR/TRACK?) 10000 400 
(20(10) SECTOR/TRACK) 11000 400 
ECC 40 2 
tea 20 1 
(22(10) SECTOR/TRACK) 160 7 
(20(10) SECTOR/TRACK) 140 6 


REFER TO THE RKO& UNIBUS DISK SUBSYSTEM SPECIFICATION FOR MORE 
DETAILED DESCRIPTION. 


THE “BIT COUNT” REPORTED IS INITIALIZED AT THE START OF EACH FIELD 
AND IS INCREMENTED FOR EACH BIT PROCESSED. 


WHEN THE OPERATION sine SORE INVOLVES WRITING, OTHER PERTINENT 
INFORMA ION aaY CON BEL mg: PRESENT BIT, PRESENT 
ey ge BITS ARE P PRE PRESENTED IN “tars 


N_ THE OPERATION BEING PERFORMED NYO. VES BER ING, OTHER PERTINENT 
ORMATION MAY CONTAIN PREVIOUS BIT AND PRESENT BIT WORDS. THESE 
ie THE, DECODER. LOGIC THAT DETERMINES WHEN THE BIT IS VALID 


SEQ 0017 


CZR6DBO RK611 OSKLS CTRL Bay) 


CZ2R6DB8.P11 O0e-DEC-77 


VelvelVelvelvelvelvelvelvelvelvelvervelvelvelvelvelvelye] 
TNT ee ee ee 
VMK—-OWONOULSW-O 


167400 
000001 


001100 


000011 


000012 


177776 
177774 


177570 


000000 


000007 
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; #e# REV 003 #x* 
"NLIST CND,MD,MC 
LIST 


-% 
:#PROGRAM BY ROY SPITZER 


;% 
;#THIS PROGRAM WAS ASSEMBLED USING THE POP- | tees SYSMAC 
i PACKAGE (MAINDEC-11-DZQAC-C3), JAN 19, 1977 


:SBTTL OPERATIONAL SWITCH SETTINGS 
a HALT ON ERROR 
13 INHIBIT ERROR TYPEQUTS 
12 ABORT PROGRAN_AFTER 20 ERRORS 
i INHIBIT ITERATIONS 
10 BELL ON ERROR 
3 LOOP ON ERROR 
LOOP ON TEST IN SWR<7:0> 


eC CR CK ie ie Ce 


8 
‘SBTTL BASIC DEFINITIONS 
a OF THE STACK POINTER ### 1100 #%# 


-EQUIV EMT,ERROR ;;BASIC DENT TION OF ERROR CALL 
“EQUIV I0T;SCOPE ;;BASIC DEFINITION OF SCOPE CALL 


; #MISCELLANEOUS estima - 


i RE as pana Te 


§ 


CR= 15 
CRLF= 200 Hecate € salts 6 RE TURN-LINE FEED 
PS= 177776 ESSOR erat WORD 
-EQUIV PS,PSW 
STKLMT= 177774 STACK LIMIT REGISTER 
RG= 77772 : PROGRAM 


33 INTO oe Re Quest REGISTER 
D tt HARDWARE SWITCH REGISTER 
DDISP= 177570 ;HARDWARE DISPLAY REGISTER 


*GENERAL PURPOSE REGISTER DEFINITIONS 


bo= %0 RAL REGISTER 
Riz %1 i: NERAL RE RTeTER 
Re= %2 ;;GENERAL REGISTER 
R3= %3 ?:GENERAL REGISTER 
R4= %4 j i GENERAL REGISTER 
RS= “S : GE GISTER 
Rb= %b ::GENERAL REGISTER 
R7= “7 ::GENERAL REGISTER 


aT RK611 OSKLS CTRL PRTY 


DB.P O02-DEC-77 10:00 
936 0000 
$35 0000 

28 
340 000000 
941 000040 
942 000100 
ana 000140 

45 Go0s40 
S46 000300 
947 000340 
34 
94 
950 100000 
951 0400 
9Se 020000 
9$3 010000 
954 Ooo4 
9sS 002000 
956 001000 
ee 
3 1 
960 000040 
961 000020 
962 000010 
a4 do0obe 

6S 0 5 1 
966 
967 
968 
969 
970 
971 
97e 
973 
974 
975 
976 

77 

78 100000 
979 040000 
980 0200 
981 010000 
982 004000 
983 002000 
984 001000 
98S 000400 
986 00020 
987 00010 
988 000040 
9893 000020 
990 000010 


991 000004 


NOU CWO 
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BASIC DEFINITIONS 
SP= % $s Brac POINTER 
PC= %7 :PROGRAM COUNTER 
-*PRIORITY LEVEL oer INITIO 
bros 0 OPRIORITY LEVEL 
PRi= 40 :PRIORITY LEVEL 
PRe= 100 PRIORITY LEVEL 
PR3= 14 ;;PRIORITY LEVEL 
PRY= 2 i ;PRIOR TY LEVEL 
PRS= 4 >; PRIOR Ty LEVEL 
PR6= 300 ss ERIORETY LEVEL 
PR7= 340 :PRIORITY LEVEL 
*"SWITCH REGISTER” qurten DEFINITIONS 
Wl 00000 
SWi4= 0000 
SWi3= 20000 
Wie= 10000 
Wil= 4000 
Swid= 2000 
SwOo9= 1000 
sHOB= 400 
ape: 100 
SWOS= 40 
SWO4= 20 
SWwO3= 10 
WO2= y 
= 2 
WOO= 1 
“EQUIV SWO9,SW9 
-EQUIV SWO8, 
-EQUIV SWO7,SW7 
-EQU Vv B 6 
[EQUIV *Sws 
- EQUIV 4) Sw4 
-EQUIV SWO3, 
“EQUIV SWO2, Swe 
-EQUIV SWO1,SW1 
“EQUIV SWOO,SWO 
-¥DATA BIT DEFINITIONS (BITOO TO BITIS) 
arene To obso 
BITI4= 4000 
: 113s 2000 
Tle= 10000 
BIT1i= 4000 
BIT10= 2000 
BITOS= 1006 
BITOs= 400 
BITO07= 200 
B1TOb= 100 
BITOS= 40 
BITO4= 20 
BITO3= 10 
BITO2= 4 


SEG 0019 
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338 

ogc 

Qag 

997 

ggg 

999 

1990 

101 

1003 

1004 

ine - 
1008 gone 
ins pooet 

ie 

i516 00014 
10le atin 
te 000030 
ipti ne 
1016 000064 
1017 000240 
i018 e001 8 
1020 bopoor 
1021 oo000s 
1022 000210 
1023 000240 
1024 177440 
10es 

1026 

1027 

1028 000000 
1029 ooo000e2 
1030 000004 
ies reat 
1036 alt 
1034 000014 
1035S ooool1 
1036 00002 
1037 oo0024 
1038 oo0o0g2e6 
1039 003 
1040 000036 
1041 000030 
1042 000032 
1043 oo0oGee 
1044 

104s 

i046 

1047 ooo0001 
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BiTRA= 
Hig brros, errs 
Eouty BItO? BIT? 
“EQUIV BITO6,BITE s 
-EQUIV B1T0s, 11S é 
“EQUIV TO4; BIT 
“EQUIV 8ITO3;8IT3 
- EGU Vv 1102, Bite 
[EQUIV TOI; BITi 
“EQUIV BITOO;BITO 
j BASIC cpu” TRAP VECTOR ADDRESSES onan omen 
BRRVE = 10 it RECERVED AND ILLEGAL INSTRUCTIONS 
TBITVEC=14 ::"T" BIT 
TRT c= 14 :? TRACE TRAP 
BPTVEG= 14 BREAKPOINT TRAP (BPT) 
Lor c= By He T/ TPuT TRAP (IOT) **#SCOPEx* 
EMTVEC= 30 ::EMULATOR TRAP (EMT) ¥#ERROR** 
TRAPVEC=34 7: "TRAP" T 
TKVEC= 3; TTY KE VECTOR 
TPVEC= 64 3; TTY PRINTER VECTOR 
PIRGVEC=240 :: PROGRAM INTERRUPT REQUEST VECTOR 
MVEC= 114 ;MEMORY PARITY VECTOR 
MEMBAS= 172100 :MEMORY PARITY euE DRESS 
AR.EN= 1 :ENABLE MEMORY PARIT 
R. PAR= : jWRITE BAD PARITY 
Braok= BA BeeHhe meet payee rfooress 
ABASE= 177440 :DEFINE BASE OF RK611 REGISTERS 
SBTTL RK611 CONTROLLER REGISTER DEFINITION 
RKCS1= 0 ; CONT! AND STATUS REGISTER 1 
RKWc= 2 : WORD T ISTER 
RKBA= 4 BUS Ss STER 
RKecs= f OE TREY AND STATUS REGISTER © 
RKDS= 19 Sei VE TATUS REGTeTE 
RKER= 14 *ERROR REGISTER 
RKASOF= 1g j ATTENTION Y OFFSET REGISTER 
RKDCYL= :DESIRED CYLINDER REGISTER 
RKDB= 24 :DATA BUFFER 
RKMRI= 26 *MAINTENANCE REGISTER 1 
RKMR2= 34 ‘MAINTENANCE REGISTER 2 
KMR3= 36 :MAINTENANCE REGISTER 3 
RKECPS= 30 *ECC POSITION INFORMATION 
RKECPT= 32 tECC PATTERN INFORMATION 
RKSPAR= 22 :SPARE REGISTER 
.SBTTL DRIVE COMMANDS 
SELDRV= O01 ;SELECT DRIVE 


SEQ 0020 


102 
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¢ Pil 02-DEC-77 10:00 DRIVE COMMANDS 

1048 oo00003 PACK= 03 ;PACK ACKNOWLEDGE 

1049 000005 CLEAR= OS :DRIVE CLEAR 

1050 000007 UNLOAD= 07 : UNLOAD 

1051 00001 SRTSPL= 11 i START SPINDLE 

ipe5 aap GEFSET= 1é iorrcere 

{pea eretept SEEK= 13 SEE 

1055 000021 TA= 21 :READ DATA 

1056 o000e3 WRDATA= 23 :WRITE DATA 

1057 RDHEAD= 25 ?READ HEADER 

1058 000027 WRHEAD= 27 $WRITE HEADER AND DATA 

1059 31 WRTCHK= 31 :WRITE CHECK 

1960 000300 INTR= 300 :GENERATE INTERRUPT TO CPU 

106¢ SBTTL CONTROL AND STATUS REGISTER 1 BITS 

1064 000001 GO= BITO ;GO BIT 

ieee epee08 iby. BITS Eaneat ret ReagS 

1067 00 BAl6= BIT8 60e ROLE RET 16 

1068 001000 BA17= BITS >BUS ss 17 

1069 002000 CDT= BITIO > CONT TYPE (O=RKO6) 

1970 004000 €TO= BIT11 5 CONT LER TIMED OUT WAITING FOR 

1078 CFMT= BIT12 I CONTROLLE ~ORIVE FORMAT (O0=26 SECTOR, 1=24 SECTOR) 

1073 020000 SPAR= BIT13 : DRIVE TY ERROR DETECTED BY CONTROLLER 

1074 040000 DI= BIT14 :DRIVE INTERRUPT 

1075 100000 CERR= BITIS : CONT LE ERROR 

1076 100000 C€CLR= BIT15 ‘CONTROLLER CLEAR 

1078 _SBTTL CONTROL AND STATUS REGISTER 2 BITS 

1080 0007 DRVMSK= 7 sMASK F IVE SELECTION CODE 

1081 000010 RLS= BIT3 ? DESEL ef or RELEASE DRIVE IN BITS 0-2 

1082 0020 BAI= BITY : SS INCREMENT INHIBIT 

1083 pogo40 SCLR= BITS ; CLEAR CONTROLLER AND ALL DRIVES 

108s Revel OR= BIT? : 1 Repoy 

1086 000409 UFE= BITS :UNIT FIELD E 

1087 1000 MDS= BITS MUL TIPLE DRIVE SELECT 

1088 002000 = ITiO PR ING E 

1089 004000 NEM= BIT11 :NON-EXISTENT MEMORY 

1090 010000 NED= BIT12 *NON-EXISTENT DRIVE 

1091 00 UPE= BITi3 ? UNIBUS ITY ERROR 

1092 040000 WCE= BIT14 *WRITE CHECK ERROR 

1033 co DLT= BITIS ‘DATA LATE ERROR 

1095 .SBTTL ERROR REGISTER BIT DEFINITION 

1097 000001 ILF= BITO ; ILLEGAL FUNCTION CODE 

1098 oo2 SKI= BIT1 :SEEK INCOMPLETE 

1099 oo0004 NXF = BIT2 :NON-EXECUTABLE DRIVE FUNCTION 

1100 000010 DRPAR= BITS ‘DRIVE DETECTED DRIVE BUS PARITY ERROR 

1101 000020 FMTE= BITY ‘FORMAT E 

i102 000040 DTYE= BITS :DRIVE TYPE ERROR 

1103 000100 ECH= BITé ?ECC HARD 


a 
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1104 o00200 SE= BIT7 ;BAD SECTOR ERROR 

1105 00 HVRC= 8IT8 tHEADER VRC_ERRROR 

1106 1000 COE= BITS ;CYLINDER ADDRESS OVERELOW ERROR 

1107 002000 IDAE= BITIO : INVALID DISK ADDRESS 

1108 po4000 WLE= BITi1 *WRIT Lock ERROR 

1109 10000 DTE= IT12 ;DRI IMING ERROR 

1116 920900 OPI= BIT13 j OPERATION (SEARCH) INCOMPLETE 

tile rleeiva DCK= BITIS BATH CHEEK 

1114 SBTTL STATUS REGISTER BIT DEFINITION 

1116 ooo001 DRA= BITO ;DRIVE AVAILABLE (CONTROLLER IS SET IF 

1117 : THIS BIT ESET) 

1118 ooo004 ST= BIT2 :DRIVE OFFSE 

1119 000010 CLO= ®BIT3 7AC LOW 

1120 20 SPDLSS= BITY :SPEED LOSS 

1121 00040 DROT= BITS :DRIVE OFF TRACK 

llee 100 VV= BITS : VOLUME VAL 

1le3 000200 DRDY= 8117 :DRIVE READY 

1124 00040 DDT= BITS ; DRIVE TYPE (O=RKO6) 

1125 00400 WRL= BIT11 :WRITE LOCK 

1126 o20000 PIP= BIT13 j POSITIONING IN PROGRESS 

1127 040000 DSC= BIT14 JORIVE STATUS CHANGE 

1128 100000 SVAL= BITIS :STATUS VALID 

1130 .SBTTL MAINTENANCE REGISTER 1 BIT DEFINITION 

1132 000017 MESMSK= 17 ;MESSAGE MASK 

1134 ooo020 PAT= BITY  Pachog Te N PARITY ON DRIVE MESSAGE LINES 

1135 000040 DMD= BITS DI 

1136 0100 MSP= BITS j MATNTENANC "SECTOR PULSE 

1137 000200 MIND= BIT7 ? MAINTENANC 

1138 000400 MCLK= BITS :MAINT! 

1139 000 MERD= ®B8I1T9 j MATNTENANC KeObED READ DATA 

1140 002000 MEWD=  BITIO :MAINT NE NCODED vance = DATA 

1141 000 PCA= BIT11 :PRECOMPENSATION AD 

1142 010000 PCD= BIT12 ; PRECOMPENSAT ION BELAY 

1143 000 ECCW= BITI3 :ECC WORD IS BEING READ OR WRITTEN 

1144 040000 WRTGAT= BIT14 ‘WRITE GATE 

1145 100000 RDGATE= BITIS *READ GATE 

1147 .SBTTL TRANSMITTED MESSAGE A 

1149 oo00020 S.SEEK= BITY ;SEEK COMMAND 

1150 00004 S:RECL= BITS REC IBRATE COMMAND 

1151 09010 5:STSP= BITE ?STAR SP INDLE COMMAND 

1152 000200 S:RTC= BIT? :DRIVE RETURN TO CENTERLINE COMMAND 

1153 000400 S:CLR= 8178 ;CLEAR ERROR AND DSC 

1154 001000 S:FMT= BITS ;FOR MAT 

1155 002000 S:UNLD= BITIO ? UNLOAD 

1156 004000 5:PACK= BIT11 ‘SET VOLUME VALID (PACK ACKNOWNLEDGE ) 

1157 -SBTTL TRAP CATCHER 

a 

1159 oooo00 .=0 


KO0e 
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CZR6DB.P 02-DEC-77 10:00 TRAP CATCHER 
1160 ;#ALL UNUSED LOCATIONS FROM 4 - 776 CONTAIN A “.+2,HALT” 
1161 ;#SEQUENCE TO CATCH ILLEGAL TRAPS AND INTERRUPTS 
1ibe :#LOCATION 0 CONTAINS 0 TO CATCH IMPROPERLY LOADED VECTORS 
116 900174 .2174 
1164 0001 DISPREG: .WORD O ;;SOFTWARE DISPLAY REGISTER 
1165 000176 oo00000 G: _.WORD :;SOFTWARE SWITCH REGISTER 
1166 SBTTL STARTING ADDRESS(ES) 
116 gog200 000137 003334 IMP aes TART ;;JUMP TO STARTING ADDRESS OF PROGRAM 
1168 0204 00013” 003324 a RESTRT ; JUMP TO RESTART ROUTINE 
1170 000214 600137 003314 JMP PARM ; JUMP TO OPERATOR ASSIGNED PARMETERS 
117k .SBTTL ACT11 HOOKS 
1173 : LEEKS ERARRRERRKRE RAKE RARER ARR RAE RRA KR AKK ERE RAA AKA AKA AARARKARARAE 
1174 :HOOKS REQUIRED BY ACT11 
1175 20 S$SVPC=. ;SAVE PC 
1176 000046 24 
1177 o00046 O340be SENDAD ;;1)SET LOC.46 TO ADDRESS OF SENDAD IN .SEOP 
1179 oo00S2 ieaitatd :WORD O j 722SET Loc.S2 TO ZERO 
1180 000220 > =$SVPC :: RESTORE PC 
1181 000114 > =MEMVEC 
1182 000114 034526 MEMERR ;MEMPARITY ERROR HANDLER 
1183 000116 9o00340 PR7 
1184 001000 ,51000, 
1186 .SBTTL AP AMETER BLOCK 
1187 + REREEEKRERREE RRR R RASA RRA RRA RRR RRA RRA ERK L RHE 
1188 Ser LOCATIONS 24 AND 44 AS REQUI F 
1189 . aT TT ia eee 
tigy poape4 ah T R Part 0g8 POINT TO START OF PROGRAM 
1192 o00024 Od00200 200 H 7 eH cart 
1193 0044 .=44 > ;POINT T9 “Ret INDI CT ADDRESS PNTR. 
1194 000044 001000 SAPTHOR 33POINT T HEADER BLOCK 
1195 001000 Locar I OUNTER 
1196 s «ahaa ada BEA HBB HEHE EHH HHH HB HHEEEHBEHHEHHE 
1197 ee TUP P APT PARAMETER BLOCK AS DEFINED IN THE APT-PDP11 DIAGNOSTIC 
1198 : INTERFACE SPEC. 
1200 001000 SAPTHD: 
1201 001000 jc000 SHIBTS: . 3; TWO HIGH BITS OF 18 BIT MAILBOX ADDR. 
1e02 001002 1214 SMBADR: .WORD S$MAIL ;;ADDRESS APT MAILBOX (BITS 0-15) 
1203 001004 900000 STSTM: .WORD ?:RUN TIM OF LONGEST TEST 
1204 001006 o00000 SPASTM: .WORD >:RUN TIME IN SECS. 1ST PASS ON 1 UNIT (QUICK VERIFY) 
1e0S 001010 o00000 SUNITM: .WORD ‘ADDITIONAL RUN TIME (SECS) OF A PASS FOR EACH ADDITIONAL UNIT 
1206 001012 000032 “WORD  SETEND-SMAIL72 ; ; LENGTH MAILBOX-E TABLE (WORDS) 
1207 0001 MSP= BIT& jMAINT NANCE of OR PULSE 
1208 0002 MIND= BIT7 ?MAINT AGE 
1209 000400 MCLK= BITS : MAINT LOCK 
1210 10 MERD= 8179 ; MAINTENANC NC p READ DATA 
1211 00200 MEWD= BITIO ;MAINTENAC NEOpE WRITE DATA 
lele 4000 PCA= BITi1 j PRECOMPENSATION ADVANCE 
1e13 010000 PCD= BIT12 ?PRECOMPENSATION DELAY 
i214 020000 ECCW=  BITI3 *ECC WORD IS BEING READ OR WRITTEN 
1215 040000 WRTGAT= BIT14 :WRITE GATE 


SSREBE OPTS! BESbECSIS Ghhd | ACY!) SREP BRRanetER BLOCK 1-20 Pa 2 Sea ones 


UNM 


SERZORHS 


LELLL 


rd it et tp Set ite 


ooode4 
000044 


Nd a dd ed ed ed ed od ed ed dd ed ed dd ed ed ed ed ed ed ed ed el el ee eee ee 


rururonrofurnor 


001000 


001000 


003334 
003324 


003314 


ROGATE= BITIS ;READ GATE 
_SBTTL TRANSMITTED MESSAGE A 

.SEEK= BITY SEEK COMMAND 
*RECL= BITS RECALTBRATE C 

Spree. BIT? SRE RETURN CENTERLINE COMMAND 
-RTC= ; 

e-Rig= BITe fa aut aes 

S.FHT=_ BIT9 iF 

8° UNLD= BITIO ROAD 

s; Packs Til ISET VOLUME VALID (PACK ACKNOWNLEDGE) 

ee CATCHER 


; #ALL D LOCATIONS FROM 4 - 776 CONTAIN A “.+2,HALT” 
#SEQUENCE TO CATCH ILLEGAL TRAPS AND INTERRUPTS 
; #LOCATION CONTAINS 0 TO CATCH IMPROPERLY LOADED VECTORS 


DISPREG: “HORD ;; SOFTWARE DISPLAY REGISTER 
;;SOFTWARE SWITCH REGISTER 


eeTTL aia START 353 
5 SUMP TO_STARTING ADDRESS OF PROGRAM 
; JUMP TO RESTART ROUTINE 


; JUMP TO OPERATOR ASSIGNED PARMETERS 


PARM 
-SBTTL ACT11 HOOKS 


. = KERR KGEERELEK ERE E RES ERE AERA AEA RKAR REA RARE RE RARARRAAKARAARAKAELE 
i Ho OKS REQUIRED BY ACT11 


vp ;SAVE PC 
SEN Dp ;;1)SET LOC.46 TO ADDRESS OF SENDAD IN .SEOP 
“WORD O ;32)SET LOC.52@ 10 ZERO 
* =$SVPC tt RESTORE PC 
. =MEMVEC 
MENERR ;MEMPARITY ERROR HANDLER 


251000 
.SBTTL APT PARAMETER BLOCK 


ay ee Eo co I: ae 


:SE1 LOCATIONS 24 AND 44 AS REQUI 
pmaunneagonesenesseteeese aati eee 


-$ ;;SAVE C NT _LOCATION 
.=24 ss SET pee Fag TO POINT TO START OF PROGRAM 


T UP 
tip POINT | TO “RET + BERGER BLoe ADDRESS PNTR. 
SAPTHOR ;;POINT TO AP 
xX *RESET [ScArion COUNT KO 
—peeenast erat {RESET LOCRTEON, COUNTER 
SETUP. APT PARAMETER BLOCK AS DEFINED IN THE APT-PDP11 DIAGNOSTIC 


SAPTHD: 


CZREDBO_AK611 DSKLS CTRL PRTY MACYI1 3D(1046) O2-DEC-77 10:20 PAGE 25 SEQ 0025 
CZR6DB.P11  O2-DEC-77 10:00 pete BLOCK : 


1272 901009 oo0000 SHIBTS: East ;;TWO HIGH BITS | OF 18 8 BIT MAILBOX Boor 
ie : . -_ 
1823 BBibRG BBAGAd e7eeRe 1888 SACRA LOR, 
1875 901906 PASTM: 2: N SECS. OF 1ST PASS ON 1 UNIT (QUICK VERIFY) 
1 001010 so00000 UNITM: WORD ADIT TONAL Maun TIME (SECS) OF A PASS FOR EACH ADDITIONAL UNIT 
1277 001012 000032 “WORD  SETEND-SMAIL 72 ;;LENGTH MAILBOX-E TABLE (WORDS) 
| 


a LT SS 


Cc RK611 OSKLS CTRL PRT4Y 
soa Pil B2<bEC-77 10:00 


ruru 
wa § 


SC) 
AG 


afat 





BIRRE DNC ETE ERT RSE ERE ERS 
SSSesst . 


2 
888 





a 


PENT LVONTUL VOT LORE VOR LUOTN EVOF LOVES 


3 
310 O0 
ait 
313 i 
14 0 
iF : 
t ' } 
318 00 ite ate 56 
318 OC 
319 OC 
350 we 
see 00 000000 
35¢ §o1509 177607 000377 
26 210 077 
ell 015 
ele ooodle 


WW 


ed ed ed el ed ed ed ee ed ed ed ed ed ed eed ed eed ee ed el el ee ee ee ee ee 
et 
Wh--OWON 


WWWWWWWU) 





MACY11 30(1046) — 10:20 PAGE 26 
COMMON TAG 


.-SBTTL COMMON TAGS 


35 pocscgsonenqceessescensree tan tue Lio 
ae. VARIOUS COMMON STORAGE LOCATIONS 


BE IN THE PR 


.=1100 
SCMTAG: 

WO 0 
STSTNM: .BYT 
SERFLG: .BYT 0 
SICNT: .WORD 9 

P : .WORD 
SLPERR: > WORD & 
Het : 6 one 0 
SERMAX: .BYTE 1 
SERRPC: .WORD 0 
ce: coef 
S$GDDAT: -WORD 0 
avi fa 

roe: Be 8B 
SIRE: Ee 8 

7 WORD g 
SUR: > WORD SWR 
DISPLAY: .WORD DDISP 
$TKS: 17756 
S$TKB: 17756 
Sips: i77eee 
SNULL: Leer 0 
SFILLS: -BYTE e. 
Sr BELE! “BYTE j 
STMPO: “WORD O 
Stipe: ;WOR 5 
he 
STP: - WORD : 
SIMPe: “WORD OO 
STIMES: 0 
aay -ASCIZ +» tlie halal 
SQUES: -ASCIT 
SCRLF: SCII 18 
SLF: 12 2 


‘ASTTL APT MAILBOX-ETABLE 
”  ~ eamaatai pe klemea echtti te enen  acantntent 


‘EVE 


;;START OF COMMON TAGS 
; s sCONTAING Ite THE of FLAG NUMBER 


+: CONTA 

+: CONTA TEST ITERATION COUNT 

;; CONTA Lo 

ieowraine oem Emaar petee tea 

tt EONTA fen CONTROL Rete 

;;CONTAINS MAX. ERRORS PER TES 
*CONTAINS PC 


CONTA OF LAST ERROR FReTRUCTION 

SUAS SBBeegs Ge “GHD? cee 

SSuTaS «B20? ofa” 
:TREGERVED--NOT TO BE USED 

tTTNTERRUPT MODE INDICATOR 


lia | $4 El TCH REGISTER 
58 AY 
i Y 

itty 


GISTER 
Status FreR REG: AOD ADORE Se 


;; CONTAINS NUL 
;;CONTA ae g FILLER ILLER Sane eae REQUIRED 
it ATPENINAC AVAILABLE’ FLAG (BIT <O7>=0>¥ 
33° T at ILABLE™ FLAG” (BIT<07>=0=YES) 
aes 
98 
TUBER DEFINE 
NE 


i on BEL yy ADDRESS 
ii QUE TION MAR 
; ; CARRIAGE RETURN 


Cc > 
OE HHHNOD Ua HGAAABRAHHHHHHEE AIEEE HHHHEHHEH I aeaeeeenie 


SES 0026 





CZR6 RK611 OSKLS CTRL PRTY MACYII1 30¢ 1046) 02-DEC-77 10:20 PAGE 27 SEQ 0027 
CZR60B8.P11 02-DEC-77 10:00 APT MAILBOX-ETABLE 

1334 1214 $MAIL: 3 ;APT MAILBOX 

13 1214 stag hy: .-WORD caeety ii ES YPE CODE 

1 1 SFATAL: .WORD FATAL ::FA BC ERROR NUMBER 

13 1 STESTN: - WORD ATESTN 3;;TEST NUMBER 

1338 OOle SPASS: .WOR APAS $3 FoF 

1 DO 1¢ SDEVCT: “WOR ADEVCT 5 DEV T 

1 001 SUNIT: . AUNI :31/0 UNIT NUMBER 

i342 BLS sueere: ‘HoRD Ameace i ines NOTH 

en 8 s ee 

1345 $1835 Se fabcE: ays NVI T TABLE 

1344 1234 000 SENV:  .BYTE ENV 5 FENVE T BYTE 

1345 1235 000 SENVM: :BYTE AENVM ;; MODE BITS 

13 1236 000000 SSWREG: .WORD ASWREG ;:APT SWITCH REGISTER 

1347 001240 o00000 SUSWR: .WORD AUSWR ;;USER SWITCHES 

1348 OOle4¥2 o00000 SCPUOP: :WORD ACPUOP ::CPU TYPE,OPTIONS 

1349 ; BtTs 1S-11=CPu TYPE 

1350 :% 11704=01, 11705=02, 11720=03, 11/40=04, 11745=05 

1351 $i at 770206, PO@=07 , d=10 

1352 ti BIT 10= IME’ CLOCK 

1353 : BIT S=FLOATING POINT PROCESSOR 

1354 + IT 8 Coe MANDO MENT 

1355 001244 000 $MAMS1: .BYTE AMAMS1 ;;HIGH ADDRESS,M.S. BYTE 

1356 O01e4s 000 SMTYP1: .BYTE AMTYPL ::MEM. TYPE, BLKSi 

1357 i MEM. TYPE BYTE  -- (HIGH BYTE) 

1358 1 i NSEC CORE=001 

1359 a € BIPOLAR=002 

te? po1246 00000 éMADRI: .WORD AMADRI ;;HIGH Buel 

1362 + i MEM. .23 BYTES, THIS WORD AND LOW OF “TYPE” ABOVE 

1363 001250 000 $maMS2: .BYTE 2 ;;HIGH SS,M.S. BYTE 

1364 001251 000 SMTYPe: .BYT AMTYP jen. , BLK 

1365 1252 oo0000 SMADRe: BORD > 3 MEM. ss, Ks2 

1366 001254 000 MAMS3: -BYT ; ;HIGH M.S-BYTE 

1367 O00125S 000 SMTYP3: .BYTE AMTYP3 ;:MEM.TYPE, 

1368 001256 000000 MADR3: .WOR 33 MEM. SS,BLKs3 

1369 001260 000 S$MAMSY: | BYT ; ;HIGH M.S:BYTE 

1370 001261 000 SMTYPY: .BYT AMTYPY 33MEM. TYPE, BLK&4 

1371 OOleb2 o00000 SMADRY: : A j MEM. LAS SS,BLKs4 

1372 001264 i0 $VECTI: -WORD AVECTI i FINTE UPT VECTOR#1, BUS PRIORITY#1 

1373 OOle66 oo00000 SVECT2: .WORD AVECT2 ;;INTERRUPT VECTORS#2BUS PRIORITY#e 

1374 001270 177440 S$BASE: .WORD BASE ::BAS ADDRESS OF EQUIPMENT UNDER TEST 

1375 001272 O00000 SDEVM: :WORD ADEVM ;:DEVICE MA 

1376 001274 o00000 SCDW1: :WORD ACDW1 ;:CONTROLLER DESCRIPTION WORD#1 

1377 001276 o00000 $CDW2: [WORD ACDW2  ;:CONTROLLER DESCRIPTION WORD#e 

1378 001300 SETEND: 


03 


CZREDBO RKEL I DSKLS CTRL PRTY MACYI1 30(1046) 10:20 PAGE 28 SEG 0028 
CZR608.P 02-DEC-77 10:00 ERROR POINTER TABLE 
1380 .SBTTL ERROR POINTER TABLE 
1382 *THIS TABLE CONTAINS THE INFORMA a FOR EACH ERROR THAT CAN OCCUR. 
NFORMAT at HE 
1388 LOE ation STiene. Tufs hu 8 Nees mda Tren th THE TBBLE. IS PERTINENT. 
1386 ENOTES: beck? TFEH Ee tn 6 Me ONLY PE CONTAINS M BRINTERS SOR AINED AS FOLLOWS: 
1389 ‘S at + POINTS TO THE DATA HEADER 
1383 tx T bipOtNTe 19 THE BATA 
1331 :% DF ::POINTS TO THE DATA FORMAT 
i344 001300 SERRTB 
1335 ; ERROR 1: UNEXPECTED MEMORY PARTIY ENABLE TRAP 
1 001300 046111 EMOO 
1397 001302 O44116 DHOOOC 
1398 001304 o42e4S56 DTOOO 
1 001306 FOOO 
14 . RROR 2: WRITE BIT ERROR 
1401 001310 oo00000 EMW: 
Hes BBLS Geuee br9 
IL) 
14 001316 16 0, 
rr ; PERO 3: ATTEMPTING TO CHECK SEEK MESSAGE FOR READ DATA 
1406 ; CS1 INCORRECT 
1407 001320 046156 M300 
1408 001388 052052 M40 
14 901324 oO42504 DTOO 
1410 001326 o4304e2 DFO 
1411 ; ERROR 4: ATTEMPTING TO CHECK SEEK MESSAGE FOR READ DATA 
1412 : MESS A INCORRECT 
1413 001330 O4%61S6 —M300 
1414 001336 052070 Bro. 
141S 1334 042504 D109 
1416 001336 oO4304e2 DFOG 
1417 ; ER RROR 5: ncaaneneTING TO CHECK SEEK MESSAGE FOR READ DATA 
138 001340 o46156 , ER300- 
1420 001346 OS2111 
iuel 1344 042504 pmADae 
1422 001346 o4304e DFOO3 
1423 ; RROR 6: ATTEMPTING TO CHECK SEEK MESSAGE FOR WRITE DATA 
1424 : S1 INCORRECT 
1425 001350 046233 301 
1426 001352 OS520Se EM4O00 
1427 001354 042504 DT003 
1428 001356 FOO3 
1429 ; ERROR 7: ATTEMPTING TO CHECK SEEK MESSAGE FOR WRITE DATA 
1430 ; MESS A INCORRECT 
1431 001360 046233 —EM301 
1432 001362 052070 Ema00. 
1433 001364 o042504 DT003 
1434 001366 oO43042 DFOO3 
1435 ; ERROR 10: ATTEMPTING TO CHECK SEEK MESSAGE FOR WRITE DATA 


a O2-DEC-77 10:00 ERROR POINTER TABLE 
1437 MESS 8 INCOR 
ry Bare Bae i pas ewer 
ivaa 001376 r br003 
1440 001376 ON304e 
Iie ; ATTEMPT 
1443 901400 ovG911 ; ee eo bine ING TO CHECK SEEK MESSAGE FOR WRITE CHECK 
1445 01408 Oosead EM4O00 
ive BBB: Bisoed pr03 
1448 ; ERROR 12: ATTEMPT 
18 coro ovat Rese A TAcoRREET ING TO CHECK SEEK MESSAGE FOR WRITE CHECK 
1482 pp tag Bi5e04 M4001 
ijzc GUlNI6 42 r 
1454 ; ERROR 13: ATTEMPTING TO CHECK SEEK MESSAG 
Hae OO1Neg 94e311 ; ae B INCORRECT “6 E FOR WRITE CHECK 
iUee poluse paB604 br003 
145g 001426 043042 
1460 ; PRROR 14: 
131 op1420 ova? ; fa Erte ATTEMPTING TO CHECK CLEAR MESSAGE FOR READ DATA 
5 
1463 OO14 
ies Bolvse 43042 Bros 
14 ; ERR 1S: Au 
=| Speer epee ERROR S ORIERNPTING TO CHECK CLEAR MESSAGE FOR READ DATA 
146g OO1NNe 052070 3 
: 001444 04 M4001 
a re FOO 
1472 ; ERROR 16: ATT 
1473 9014 esi ; Ress 8 bi ATTEMPTING TO CHECK CLEAR MESSAGE FOR READ DATA 
IE 1 
tire Boies Biss pee 
1 > PRoe 17, 9 
; 3 TT 
1478 on1460 gu6%e ; Fel indoanect EMPTING TO CHECK CLEAR MESSAGE FOR WRITE DATA 
ise Gee aoe pre 
1385 OOINGE 043042 £003 
1484 20: ATTEMPT 
1485 g01479 oveue nese. O: ATTEMPTING TO CHECK CLEAR MESSAGE FOR URITE DATA 
1B? 0174 bae504 M4001 
aaa Me F 
i490 ; ERROR 21: ATT 
5 | SS, AR nese at SL coATTEMPTING TO CHECK CLEAR MESSAGE FOR WRITE DATA 


CZR6DB0 RK611 OSKLS CTRL PRTY 
CZR6DB .P 00 


ll O02-DEC-77 10: 
1492 00150e OS2111 
1493 001504 O4eS04 
1494 001506 043042 
1495S 
1496 
1497 001510 O46SeS 
1498 001512 OSe0Se 
1499 001514 eS04 
1500 001516 O4304e2 
tees 
1203 001520 6 
ee ieee featee 
1208 polese 2 
15 
1508 
1S09 001530 65. 
1510 BB ase peek it 
1511 00153" e504 
iets 001536 043042 
151 
1514 
izle 1540 046605 
1219 Boi sue 20Se 
1518 OO01544 O42S504 
1519 00:54 3066 
1520 
1Sel 
1See 
1Se3 001550 Oo46605 
1Se4 0015Se OSel3e 
1SeS 001554 O42S504 
1Se6 O01S5S6 043066 
1527 
1S28 
1Se9 
1530 001560 046605 
1$31 00156e OSelbe 
1532 001564 042504 
1533 001566 043066 
1534 
1$35 
1536 
1537 001570 046707 
1838 001572 OSe2e0Se 
1539 001574 O42eS04 
1540 001576 043066 
1541 
1345 
154 
1544 001600 04670 
1S45 00160e 052132 
iS46 001604 O42504 
1547 001606 043066 


MACY11 30(1046) 


O2-DEC-77_ 10:20 PAGE 30 


ERROR POINTER TABLE 


Em4O02 
Drou3 
tag 2: ATTEMPTING TO CHECK CLEAR MESSAGE FOR WRITE CHECK 
S1_ INCORRECT 

en 


0 
RRO; 23: ATTEMPTING TO CHECK CLEAR MESSAGE FOR WRITE CHECK 
esa." INCORRECT 


EM4O01 
D0T003 


DFOO 
PRROR 24: ATTEMPTING TO CHECK CLEAR MESSAGE FOR WRITE CHECK 
MESS B INCORRECT 


Aas 
sey 
RROR 25: ATTEMPTING TO CHECK HEADER GENERATION 
WITH VARIOUS CYLINDER VALUES 
CS1_ INCORRECT 
M4 
DTOO3 
DOF O2S 
ERROR 26: ATTEMPTING TO CHECK HEADER GENERATION 


WITH VARIOUS CYLINDER VALUES 

FIRST WORD OF HEADER INCORRECT 

EM306 

EmM4O03 

Does 

ERROR 27: ATTEMPTING TO CHECK HEADER GENERATION 
WITH VARIOUS CYLINDER VALUES 

SECOND WORD OF HEADER INCORRECT 

EM306 

EM4O04 

D0TO03 

DFOeS 

ERROR 30: ATTEMPTING TO CHECK HEADER GENERATION 
WITH VARIOUS TRACK VALUES 

CS1_ INCORRECT 

EM3' 

MY 


EM4O00 
DTO003 
pEQeS 
ERROR 31: ATTEMPTING TO CHECK HEADER GENERATION 


WITH VARIOUS TRACK VALUES 
FIRST WORD OF HEADER INCORRECT 


SES 0030 


CZR60B0 RKE11 DSKLS CTRL PRTY MACY11 30(1046) O2-DEC-77 10:20 PAGE 31 SEQ 0021 
CZ2R6DB.P11 O02-DEC-77 10:00 ERROR POINTER TABLE ’ 


1548 ; ERROR 32: ATTEMPTING TO CHECK HEADER GENERATION 
1549 : WITH VARIOUS TRACK VALUES 

15S0 : SECOND WORD OF HEADER INCORRECT 

1881 001619 046707 En307 

15 001612 OS2ibe M4 

Hee) Bblele Bissee preue 

12e¢ ; PEROR 33: ATTEMPTING TO CHECK HEADER GENERATION 
1556 : WITH VARIOUS SECTOR VALUES 

1 : CS1 INCORRECT 

1558 001620 047006 EM308 

1559 O0l6e2 OS20S2 EM4O00 

Hee? bleee Bissee brags 

1562 ; PEROR 34: ATTEMPTING TO CHECK HEADER GENERATION 
1563 : WITH VARIOUS SECTOR V 

1564 : FIRST WORD OF HEADER INCORRECT 

1565 001630 0470 EM3 

1566 1632 052132 M4003 

126g Bolese O4S0ee bros 

1568 ; ne VBS; oye TEMPTING TO CHECK HEADER GENERATION 
1571 ; SEC OND WORD D OF HEADER INCORRECT 

1572 001640 047006 EM 

1573 001642 OS2162 EM4OO4 

tere blele Bisse prees 

1576 ; ERROR 36: ATTEMPTING TO CHECK HEADER GENERATION 
1577 : WITH VARIOUS FORMAT VALUES 

1258 oo1eso 047106 ' Oe aeteena 

1580 001652 EMYOOO 

1581 001654 o4=S504 Droge 

1582 001656 DFO, 

1583 ; ERROR 37: ATTEMPTING TO CHECK HEADER GENERATION 
1584 : WITH VARIOUS FORMAT 

158s : FIRST WORD OF HEADER” INCORRECT 

1586 001660 047106 EM3 

1587 001662 OSe2132 EM4O03 

tees Sbieee sees ae 

1530 ; ERROR 40: ATTEMPTING TO CHECK HEADER GENERATION 
1591 : WITH VARIOUS FORMAT VALUES 

1592 : SECOND WORD OF HEADER INCORRECT 

1593 001670 047106 EM309 

1594 001672 OSe2162 EMHOO4 

lege Oole7e O4ScEE 

1597 ; Foes 41: _RITEMPTING TO CHECK NPR TRANSFER FOR WRITE DATA 
1598 : eet INCORR 

1599 001700 o47206 EM310 

1600 001702 Os20S52 EM4O00 

1601 001704 o4e524 OTO41 

i602 001706 O43112 DFO41 

1603 ; ERROR 42: ATTEMPTING TO CHECK NPR TRANSFER FOR WRITE DATA 


CZR60B0 RK611 DSKLS CTRL PRTY 
CZR608.P11 


aerate 
NNNN 
a 
rsVO 


8888 8888 


ed te ey eet et eer ony 


aerate 


WNM-OWONTU CW 
8888 


ap aea 
sess 
é 


§ 


COOK O TOON Orro 
SST SRE MER PORES 


es ee he ee be ae Be be be ee be be be be be be be be ee be ee pe Be be bn hn be Be fe bs ee 


Qe-DEC-77 10:00 


0 
043172 


047273 


047273 


MACY11 30¢ 
ERR 


1046) 


O2-DEC-77_ 10:20 PAGE 32 


OR POINTER TABLE 


CSe INCORRECT 


M3 
M4 
DTO4l1 
DF O41 
ERROE ae Trem ING eet? CHECK NPR TRANSFER FOR WRITE DATA 
RROR REGISTER INCORRE 
EM310 
att ee 
rat 
DFO41 
ERROR 44: ATTEMPTING TO CHECK NPR TRANSFER FOR WRITE DATA 
BUS ADD INCORRECT 
EM310 
EmM4007 
DFO! 
RR 4S: ATTEMPTING TO CHECK NPR TRANSFER FOR WRITE DATA 
WORD COUNT INCORRECT 
EM310 
EmM4008 
DTO41 
PRROR 
R 46: ATTEMPTING TO CHECK _NPR TRANSFER FOR WRITE DATA 


OW amend AFTER READING DATA BUFFER 


EmM4O09 
OTO4NG 
OF 


47: ATTEMPTING TO CHECK NPR TRANSFER FOR WRITE DATA 


ERROR 
4 peCIORESE AFTER READING DATA BUFF 


DF O46 
ERROR SO: ATTEMPTING TO CHECK NPR TRANSFER FOR WRITE DATA 


eat REG INCORRECT AFTER READING DATA BUFFER 


M31 
EM4O11 
Brass 
ERROR S51: ATTEMPTING TO CHECK NPR TRANSFER FOR WRITE DATA 
DATA READ FROM MEMORY INCORRECT 
EM4O12 
OTOS1 


0S1 
OR S2: ATTEMPTING TO CHECK HEADER RECOGNITION 


ERR 
CS1_ INCORRECT 
EM 


ERROR S3: ATTEMPTING TO CHECK HEADER RECOGNITION 


MR1 INCORRECT AFTER GAP IN WRITE DATA 
EM311 


SEQ 0032 


CZR60B0 RK611 OSKLS CTRL PRT4 
CZR608.P11 O02-DEC-77 10:00 


Eistse Bsseee 


Baa~e" 
. 


ommowD sss 
5 
: 

5 

= 


BURA LOH ODOT LOo OBB NO 
Pene Fen 


ee ee ee ee he ee 


NNNNNNNNNN NNN NNEC OOOO OOK OO Ooo 


eee eee O 
Mtw--OwWw 


MACY11 30(1046) 


O2-DEC-77 10:20 PAGE 33 


ERROR POINTER TABLE 


Ares 


ERROR S4: ATTEMPTING TO CHECK 
et ADDRESS REG INCORRECT 


4 
Bross 
RR : ATTEMPTING TO CHECK 
EX INOER ADDRESS INCORRECT 
EM312 
mois 


m 
ERROR S6: ATTEMPTING TO CHECK 
a ADDRESS REG INCORRECT 


agi 
T 


DFOS4 
ERROR 57: ATTEMPTING TO CHECK 
EYL thOER ADDRESS INCORRECT 


ERROR 60: ATTEMPTING TO CHECK 
SK ADDRESS INCORRECT 


eH na14 
M4014 
ates 


FOS4 
R 2 61: ATTEMPTING TO CHECK 
CYLINDER ADDRESS INCORRECT 


ERROR 62: ATTEMPTING TO CHECK 
WRITE DAT 
. 1 INCORRECT 


R 
est INCORR 


DFO46 

ERROR 64: OT TOP TING TO FORCE 
CSe INCORRECT 

EM316 

EmM4OOS 


SECTOR INCREMENT 


SECTOR INCREMENT 


TRACK INCREMENT 


TRACK INCREMENT 


CYLINDER INCREMENT 


CYLINDER INCREMENT 


SECTOR PULSE DETECTION WITH 


BAD SECTOR ERROR 


BAD SECTOR ERROR 


SEQ 0033 





5 eT i DOSKLS CTRL PRTY MACYI1 30(1046) O2-DEC-77 10:20 PAGE 34 SES 0034 


C2REDB 02-DEC-77 10:00 ERROR POINTER TABLE 
His SBIR: BASTRY pres 
1718 ERROR 65: ATTEMPTING TO FORCE BAD SECTOR ERROR 
1719 ERROR REG INCORRECT 
1720 oog149 4761 M316 
1721 142 OS22 
1788 Gosive Oasise Drove 
1724 ; ERROR 66: ATTEMPTING TO FORCE HEADER VRC ERROR 
1725 BAD SECTOR PRESENT 
1728 } CS1_ INCORRECT 
172? 002150 047663 1 
1728 002152 OS20S2 E 
1750 Gosise Oaiae Drove 
1731 ERROR 67: ATTEMPTING TO FORCE HEADER VRC ERROR 
1732 WHEN BAD SECTOR PRESENT 
1733 CSe INCORRECT 
1734 002160 047663 EMI 
1735 O0el6e OSee12 EMYOOS 
ig eles Bisse be 
1738 PRROR 70: ATTEMPTING TO FORCE HEADER VRC ERROR 
1739 } WHEN BAD SECTOR PRESENT 
1740 ERROR REG INCORRECT 
1741 002170 047663 EM317 
i742 O0e17e 052230 EMYOO& 
is Hisies re pes 
1745 ERROR 71: ATTEMPTING TO FORCE HVRC ERROR 
1746 CS1_ INCORRECT 
1747 902200 047761 _ £318 
1748 OOee02 O52052 EM4OOO 
1749 O0e204 O42646 /oto71 
1750 002206 043312 ' DFO71 
1751 ERROR 72: ATTEMPTING TO FORCE HVRC ERROR 
1752 : CSe INCORRECT 
1753 002210 O47761 EN318 
1754 O0eel2 OSeele EMYOOS 
1755 O02e14 O4e64E OT071 
1756 O0ee16 043312 OFO71 
1757 ERROR 73: ATTEMPTING TO FORCE HVRC ERROR 
1758 ERROR REG INCORRECT 
1759 002220 047761 EN3i8 
1760 O0eeee 052230 EMYOOG 
trek Bisse) esis ata 
1763 ERROR 74: ATTEMPTING TO FORCE OPERATION INCOMPLETE 
1764 : CS1 INCORRECT 
1765 002230 os0020 M319 
1766 O0ee3e 052052 EM4OO0 
1767 O0ee34 042674 0T074 
1768 O0ce36 043346 OFO74 
1769 ERROR 75: ATTEMPTING TO FORCE OPERATION INCOMPLETE 
i770 CSe INCORRECT 
1771 EM319 


O622e40 050020 


CZR6D0B0 RK611 Ee ae a Se spp 


CZR60B.P11 -77 
177 eve OS2el2 
rg BORG pssese 
1774 043346 
1775 
1538 o02es0 O05 
re Bee Ben 
Hees Bissed BisSue 
1781 
1785 oS0020 
Hee SResee seone 
1785 264 e716 
1786 3372 
1787 
1788 
1789 s oS0071 
1730 7e O5e0Se 
1791 274 042674 
1792 043346 
1793 
1794 
1795 300 71 
1796 OSeele 
1797 002304 042674 
veg 306 043346 
te 
1801 002310 0071 
180e e3le O0See30 
1803 e314 042674 
t 316 O43346 
1806 
1807 320 050071 
1808 see OS2e565 
1809 3e4% O4e716 
1810 O0e3e6 043372 
1811 
HE 
1813 002330 OS0155 
118 336 20) 
1815 3 2674 
1816 336 O43346 
1817 
1818 
1819 O0SO0155 
1820 es4e OSeele 
1821 002344 042674 
155 346 O43346 
i 
18eS5 002350 050155 
i826 O0e3Se OSee 
1827 O00e3S4 042674 


MACY11 30(1046) 
ERROR POINTER TABLE 


O2-DEC-77_ 10:20 PAGE 35 


EmM4O0S 
a 
ERROR 76: Or rem Tite TO FORCE OPERATION INCOMPLETE 
ERROR REG INCORRECT 
EM319 
EM4YOO6 
i 
ERROR 77: ATTEMPTING TO FORCE OPERATION INCOMPLETE 
aa © sete AFTER GAP IN WRITE DATA 


FF rp 


PRROR 1. — TO FORCE OPI WITH HVRC ERROR ON HEADER 37 


fet 


Broa 


74 
PRROR 101: ATTEMPTING TO FORCE OPI WITH HVRC ERROR ON HEADER 


CS2_ INCORRECT 
EM320 


EM4O00S 
pao} 


DF O07’ 

ERRG e L Oe: ATTEMPTING TO FORCE OPI WITH HVRC ERROR 
Aon EG INCORRECT 

ENGODE 

a Tay 

PRROR 103: ATTEMPTING TO FORCE_OPI WITH HVRC ERROR 
pall INCORRECT AFTER GAP IN WRITE DATA 


ERROR 104: ATTEMPTING TO FORCE OPI WITH HVRC ERROR 
CSi1_ INCORRECT 

EM321 

Bray 
OF 


4 
ERROR 105: ATTEMPTING TO FORCE OPI WITH HVRC ERROR 
&s INCORRECT 


ERROR 106: OT TERE LENG TO FORCE OPI WITH HVRC ERROR 
Jase yy REG INCORRECT 


EM3e2 
Jind g 
DT074 


ON 


ON 


ON 


ON 


ON 


HEADER 


HEADER 


HEADER 


HEADER 


HEADER 


37 


37 


37 


36 


36 


36 


SES 0035 


CZREDBO., RK61L DSKLS CTRL PRT4 MACYI1 30(1046) O2-DEC-77 10:20 PAGE 36 
CZR608.P11 02-DEC-77 10:00 ERROR POINTER TABLE — ove 

16 ——. PE ROR 07: ATTEMPTING TO FORCE OPI WITH HVRC ERROR ON HEADER 36 

1830 a ; FIL INCORRECT AFTER GAP IN WRITE DATA 

1 Ses65 M4 

is Heke Bete sty 

1634 043372 DFO77 

1 ; RROR 110: ATTEMPTING TO FORCE OPI WITH HVRC ERROR ON HEADER O 

{83° 002370 oso241 , i 

1838 B08375 O520Se M4000 

1 2674 DT074 

1840 76 043346 DFO74 

184 ; ERROR 111: ATTEMPTING TO FORCE OPI WITH HVRC ERROR ON HEADER 0 

1E5 poe / ewe! 

1 4 

igue Bosuod paseeg O94 

1846 002406 043. DFO74 

184 ; ERROR ue: FALTEMPTING TO FORCE OPI WITH HVRC ERROR ON HEADER O 

1Bu9 002410 os0241 : EM322 

1850 O02e412 052230 EMY 

1851 14 042674 DT974 

1852 16 043346 DFO74 

1 ; ERROR 113: ATTEMPTING TO FORCE OPI WITH HVRC ERROR ON HEADER O 

1854 smnah” warmed : HR INCORRECT AFTER GAP IN WRITE DATA 

1856 poSuSe 052565 EM4O13 

1857 ooe4e4 042716 DT077 

1858 OO0e426 043372 DFO77 

185 ; ERROR 114: CHECKING HEADER RECOGINT ION WITH PREVIOUS BAD 

1860 os” Gueent : eaniad SECTOR ERROR CS1 INCORRECT 

1862 posuae 0S2 EM4O00 

1 ooe434 2674 DT074 

1864 3 DFO74 

1865 ; ERROR 115: CHECKING HEADER RECOGNITION WITH PREVIOUS BAD 

1866 te patel: : ioaaas SECTOR ERROR CS2 INCORRECT 

1868 O0e4%42 OS22I2 M400S 

1869 o0l444 674 DT074 

1870 O024%46 FO74 

1871 ; ERROR 116: CHECKING HEADER RECOGNITION WITH PREVIOUS BAD 

187¢ Soret : seal SECTOR ERROR ERROR INCORRECT 

1874 O02e4S2 052230 EM4006 

tere Goeiee Bisive bron 

1877 ; ERROR 117: CHECKING HEADER RECOGNITION WITH PREVIOUS BAD 

1878 at aeacenee : cane: SECTOR ERROR MR1 INCORRECT 

1880 65 62 052565 EM4013 

1881 002464 042716 01077 F 

1882 002466 043372 DFO77 

1883 ; ERROR 120: CHECKING HEADER RECOGNITION WITH PREVIOUS HEADER 


CZR6D0B0 RK611 Set a aa be MACY11 30(1046) -DEC-77_ 10:20 PAGE 37 SEQ 0037 


CZR6D8.Pi1 0:00 ERROR POINTER TABLE 
1684 anmane enact ; nanan VRC ERROR CS1 INCORRECT 
1886 72 e0Se EM4O00 
188 74 2674 DT074 
1888 76 3346 DFO74 
1889 ; ERROR 121: CHECKING HEADER RECOGNITION WITH PREVIOUS HEADER 
1830 ane : aed VRC ERROR CS2 INCORRECT 
Hiss fleets feocls prog 
1894 002506 043346 DFO74 
1895 ; ERROR 122: C CKING HEADER QGNITION WITH PREVIOUS HEADER 
: cone tenner : ean VRC ERROR ERROR REG INCORREC 
1898 002512 052230 EMYO 
1899 002514 042674 DT074 
1300 16 043346 Fo74 
1901 ; OR 123: CHECKING HEADER RECOGNITION WITH PREVIOUS HEADER 
1308 cael : on VRC ERROR MRi INCORRECT 
1904 05256 EM4013 
1905 002524 042716 1077 
1906 002526 043372 077 
1907 ; ERROR 124: FORCING BAD SECTOR ERROR WITH PREV HEADER 
i 002530 osos12 ‘ EM325 ign create ae matron! 
1910 002532 20 EM4O00 
1911 g02534 04267 DT074 
1318 36 043346 DEO74 
1313 OR 125: FORCING BAD SECTOR ERROR WITH PREV HEADER VRC ERROR 
1915 O02S540 oSoSie F EM325 
1316 002542 OS221e EM4OOS 
1917 002544 042674 DT074 
1918 002546 043346 DFO74 
191 ; ERROR 126: FORCING BAD SECTOR ERROR WITH PREV HEADER YRC ERROR 
13¢ soenen : ownes ERROR REG INCORRECT 
1955 Bosses 052230 MuG) 
1923 554 042674 DT074 
1924 002556 043346 DFO74 
1388 ; ERROR 127: FORC NG aD ECTOR ERROR WITH PREV HEADER VRC ERROR 
1927 O02560 ososi2 : EM325 
1928 62 2565 EM4O13 
1329 o0esb4 o4e716 D107? 
133? ; P ERROR 120: FORCING HEADER VRC ERROR WITH PREV BAD SECTOR ERROR 
1332 = am : aon CS1 INCORRECT 
123; BOEE72 S506 FSB 
1935 002574 O42674 DT074 
1338 002576 33 DFO74 
1337 ; ERROR 131: FORCING HEADER VRC ERROR WITH PREV BAD SECTOR ERROR 
1939 002600 oso0602 : EM326 


CZR6DBO RK611 OSKLS CTRL PRTY MACYL1 30(1046) O2-DEC-77 10:20 PAGE 38 SEQ 0038 
CZR6DB.P11  O2-DEC-77 10:00 ERROR POINTER TABLE 


3 


ERROR 132: FORCING HEADER VRC ERROR WITH PREY BAD SECTOR ERROR 
ERROR REG INCORRECT 


ee 
3 
Ww 


; PRROR 133: FORCING HEADER VRC ERROR WITH PREV BAD SECTOR ERROR 
MR1 INCORRECT 


; ERROR 134: ATTEMPTING TO CHECK ECC PATTERN CLEARING 
; ECC PATTERN INCORRECT 


; ERROR 135: ATTEMPTING TO CHECK ECC GENERATION 
; ECC PATTERN INCORRECT 





. —EM330 
EM4017 
DT134 
; PA R 136: ATTEMPTING BAD SECTOR ERROR SETTING CONTROLLER ERROR 
; CS1 INCORRECT 
002650 051135 EM331 
146 


ERROR 137: ATTEMPTING BAD SECTOR ERROR SETTING CONTROLLER ERROR 
; coe INCORRECT 


BB Sa ol tuncee cnn Bee Cam UM NT OSs Sea 


ee ee ee ee ee ee ee ee ee ee ee he ee ee ee ee ee ee ee ee 


ee 3 
D0 Bezs nS 
Doeees oHeeeS To 
; Fee 40: ATTEMPTING BAD SECTOR ERROR SETTING CONTROLLER ERROR 
: RROR G. INCORRECT 
002670 051135 
982 002672 052230 eraae 
pa posese pusiae Fue 
98s 5 ERROR 141: ATTEMPTING HEADER VRC ERROR SETTING CONTROLLER ERROR 
986 . CS1 INCORRECT 
987 002700 0S1222 EM3 
988 70e oSe2e0Se2 —EmM4O00 
5 rte sie pete 
991 s ERROR 142: ATTEMPTING HEADER VRC ERROR SETTING CONTROLLER ERROR 
992 A CS2 INCORRECT 
933 002710 oS12e22 EM332 
994 O027le OSeele EmM4OOS 
995 002714 oO4e5S4 OTO46 


CZR6DB0 RK611 OSKLS CTRL PRTY MACY11 30(1046) O2-DEC-77 10:20 PAGE 39 : SE 3 
CZR60B8.P11 O02-DEC-77 10:00 ERROR POINTER TABLE Ag 


1 002716 043146 
1338 ; PER 143: ATTEMPTING HEADER VRC ERROR SETTING CONTROLLER’ -ERROR 
1 ; RROR REG. INCORRECT . 
re 3555 maaoe 
o5q Basseq TO4e 
726 3146 DFO46 
200 ; ERROR 144: ATTEMPTING COMPLETE EXECUTION OF WRITE DATA 
; cs) ae CORRECT 
30 0514903 M 
7 beets pri” 
08 7 S 4y 
; PE AOR 14S: ATTEMPTING COMPLETE EXECUTION OF WRITE DATA 
010 ; CS2 INCORRECT 
1 051403 EM33S 
gol 2742 22le 3 
cota Soerae BSeis rs 
1 ; ERROR Lue: ATTEMPTING COMPLETE EXECUTION OF WRITE DATA 
1 ; RROR REG. INCORRECT 
1 730 1403 EM3 
18 7 230 EMY 
1 754 2742 DT144 
002756 043442 DF Ada 
; RROR 147: ATTEMPTING COMPLETE EXECUTION OF WRITE DATA 
; BUS ADDRESS INCORRECT 
eaeree SeLse3 Free 
0es 764 2742 T144 
gbee 002766 O4344e2 DF ld 
; RROR 1SO: ATTEMPTING COMPLETE EXECUTION OF WRITE DATA 
sos ; WORD COUNT INCORRECT 
002770 051403 EM335 
2030 002772 052302 —EM4O08 
31 ooe774 ate Bria 
776 44 144 
2033 ; ERROR 151: ATTEMPTING COMPLETE EXECUTION OF WRITE DATA 
2034 ; CYLINDER ADD INCORRECT 
cose P0300 B5Ls09 Es 
03 2667 M4015 
6037 O04 042742 DT144 
38 003006 O4344e DF 144 
S023 ; ERROR abBRé ATTEMPTING COMPLETE EXECUTION OF WRITE DATA 
; ISK ESS INCORRECT 
2041 003010 051403 EM335 
2042 003012 052633 EMYO14 
2043 003014 042742 OT144 
2044 003016 O4344e DF 144 
04S ; ERROR 153: ATTEMPTING ERROR CLEAR WITH CONTROLLER CLEAR 
Bit 003020 051457 . EM336 
sue Sotees Breese pres” 
2050 003026 043216 DFOSe 


FO 
e0S1 ; ERROR 154: ATTEMPTING PARTIAL SECTOR WRITE WITH ZERO FILL 


A YR mw 


c RK611 
EfRebe. P11 
20Se 


ae 
i Re 


BR FERR 
Pee 
Stine 


yh Sor 


2063 
5 
30) 
ses Bias 
00. 
2069 
2070 
sued 3060 
207 
2073 3064 
2074 003065 
76 
77 igetlay 
78 Ze 
2079 003074 
2080 0030 
2081 
2e08e 
2083 003100 
2084 003102 
e08S 003104 
2086 003106 
2087 
2088 
2089 003110 
2090 O0311le 
2091 003114 
e03e 003116 
2033 
e034 
2095 003120 
0396 O03lee 
2097 003124 
2098 003126 
2033 
2100 
2101 003130 
2e10e 003132 
2103 003134 
2104 003136 
2105 


DSKLS CTRL PRTY 
O02-DEC-77 10:00 


a 
ul 
ri 


Z 
tw 


R B9RR 99 
sae? 


trurRK 
Wut 


29RR FRR FER 
re: 


Wrote 


0 
043416 


44 
OR 155: ATTEMPTING PARTIAL SECTOR WRITE WITH ZERO FILL 
 e ecteend 


T1L44 


DF 144 
ERROR 156: ATTEMPTING PARTIAL SECTOR WRITE WITH ZERO FILL 
BRAGS REGISTER INCORRECT 


EMY 
DT144 


DF 144 

ERROR 157: ATTEMPTIN PARTIAL SECTOR WRITE WITH ZERO FILL 
BUS ADDRESS INCORRECT 

EM337 

EM4007 

DT144 


F144 
PRROR 160: ATTEMPTING PARTIAL SECTOR WRITE WITH ZERO FILL 
WORD COUNT INCORRE T 


EM3. 

E 

ks 

ERROR 161: ATTEMPTING PARTIAL SECTOR WRITE WITH ZERO FILL 
CYLINDER ADDRESS INCORRECT 

EM337 

Brigade 

ies 

ERROR Abe: ATTEMPTING PARTIAL SECTOR WRITE WITH ZERO FILL 
DISK ADDRESS INCORRECT 

EM337 

EMYO14 

DT144 

DF 144 

ERROR 163: ATTEMPTING WRITE DATA IN 18 BIT MODE 
RKECPT INCORRECT 

EM340 

EM4O17 

OT1S1 

DF 151 

ERROR 164: ATTEMPTING WRITE DATA IN 18 BIT MODE 
RKECPT INCORRECT 

EM340 

EM4O17 

DT134 

DF 134 


SEG 0040 


I 


£ERERRO Kell Beko Cie pei 





Bonaniecnene 
HIASR EMERGES 





rururururururrurararurururorurarururururorururorururururerurururraroruny 
P= GIOVERLOVSGONEULOV SOOT ELODIE ¢ 


ee ee he ee ee ee ee ee be ee ee he a 


903234 900000 
003236 Bo0000 


CO4 
MACYIT SOE TPORARY STORAGE FOR AKb11 CONTROLLER REGISTER 


-SBTTL TEMPORARY STORAGE FOR RK611 CONTROLLER REGISTER 


f-6st* 108 8 SOND" Ba BLELYEQTETSTER 1 
1- pas 2 6 :BUS } RED TRACK REGISTER 

. o . : 

ise BB e Beh ah 

(eee: WORD 5 alae nMAR apitO OFFSET REGISTER 
TARi: “HSE 6 Baila REGISTER 1 

T.MRe: -WORD 0 RESO, GI TER 2 

T:PGBs. :HORB OB BG tion 

T.ECPT: .WORD 0 :ECC PATTERN NFORMAT ION 

T.SPAR: :WORD 0 ;SPARE RE 

.SBTTL EXPECTED RK611 CONTROLLER REGISTERS 

.CS1: .W : CONT TATUS REGISTER 1 

E: bab: - WORD : US REG STER 

E.D5: ee ° xe REGISTE 

Peer: ie “WORD 0 ie i, INDER Pe SF epetetisers 
E.MRi: Ho 0 ;MAIN NANEE REGIS T 

EMRa: ce 6 natn TENCE Ress} FR 
oe EEE POTHEEg ioe 1o8 

E.SPAR: -WORD 0 PARE RE PereR 


SEQ 0041 


CZR6DBO0 RK611 OSKLS CTRL PRTY MACYI1 30(1046) O2-DEC-77 10:20 PAGE Ye SEQ cO4e 





CZR6DB.P11 02-DEC-77 10:00 PROGRAM DEFINED VARIABLES 
zis .SBTTL PROGRAM DEFINED VARIABLES 
else Rae: Moe Bhd REEL! vagogt goers 
giuz TRAPPC: - WORD TR FOR MEMORTY PARITY OPTION 
148 SRTFLG: : ?START FL 
2149 ; Os 
518i ; 1 = el4 
e -] = 
S182 ERRCNT: - WORD 9 cio Ebi FOR ABORT ERROR THRESHOLD 
cies ete ie fel 
él 5 Me. BIT: ; 0 BLT Eounr 
2186 BRDGNT: “HOR 8 ¢ SIGNIF 5 E 
i Eu, oe Lae. 
2162 MEMPAR: .WORD O HEL AG FOR MORY PAR ity OPTION 
2163 SECTOR: :BYTE 0 ?SECTOR F SE RCREME TEST 
2164 TRACK: :BYTE O ? TRACK FOR INCREMENT TES 
2165 CYLN: :WORD 0 ;CYLINDER FOR INCREMENT TEST 
5188 eococe opon0d Fear: Weep Brod iret or scab PON oft: 
2168 003312 oo0000 SAVSWR: .WORD 0 ‘STORAGE FOR Ei Eo isteR 


CZR60BO RK611 OSKLS CTRL PRTY MACY1I1 30(1046) O2-DEC-77 10:20 PAGE 43 SEQ 0043 
CZR6 11 PROGRAM SET 


VEC+ 
0000 MOV #340 vat tss.Cever 7 
33 36 MOV ePuRVEC’; ; POWER FAILURE VECTOR 
Ov #340 C+e ;;CEVEL 7 
22 7 
e201 S0s47 1250 


DB. P 02-DEC-77 10:00 SETUP 
2169 .SBTTL PROGRAM SETUP 
2171 003314 012737 000001 003246 PARM: MOV #1,SRTFLG ;LOAD START FLAG FOR PARMETER START 
gize 003322 OO00406 BR START1 
ta 903324 012737 177777 003246 RESTRT: Mov 8-1, SRTFLG ;LOAD START FLAG FOR RESTART 
217 _— _ 
5138 34 37 003246 START: CLR SRTFLG ;CLEAR START FLAG 
5138 1 001103 — CRB SE iE PED ERE OR ELE SYSTEM 
21 ye 2706 901100 OV #STACK, SP ; INITIALIZE STACK POINTER 
218i OC 7 0550 JSR PC. STKINT : INIT KEYBOARD 
cigs Gorse Glerie Gossre ney SN7=7S85? HEBER STAR OP BRSSRENT “UL INTERRUPTS 
2184 RTI : ? LOAD 
2185 
2186 003370 1S: 
218 -SBTTL. INITIALIZE THE COMMON TAGS 
e188 ;;CLEAR THE COMMON Tacs (SCMTAG) AREA 
5183 Boase4 paeaee C0t4100 my Ot«R@e i ETBRR KOGORY LOCATION 
e131 3378 2706 001140 CMP #SWR,R& ;;DONE? °*’ 
2l 1374 BNE | ;;LOOP_ BACK IF NO 
2133 12706 001100 ae.» . ris ACK, ::SETUP THE STACK POINTER 
2136 10 i 237 034646 900020 si mov BSSCOPE , SBIOTVEC 33 oT CTOR FOR SCOPE ROUTINE 
2197 96 : : 73 o4 909036 mov : ny oath Cis Mt VECTOR FOR ERROR ROUTINE 
6199 0034 12737 042366 000034 MOV T re VECTOR FOR TRAP CALLS 
1 
gi? 
1 


S 
S 


T OF -PROGRAM COUNTER 
v! ei NUMBER OF ITERATIONS 
canner ERROR ADDRESS 
I 





2206 003506 1127 1 ALLOW TEST 
2207 003514 b. 7 903514 NIT THE L ADDRESS FOR SCOPE 
2208 O03522 Ol 2 ERROR LOOP ADDRESS 

2209 gis R. IF No F IT 1s 

2210 TWARE SHITCH GISTER. 

ssid Soseaq 13545 ppgo08 3 gave Me CECTOR 

g5is 003842 018737 T93E50 bieET FORA HERBWORE SWICH REGISTER 
2214 0035 12737 177570 *:AND A HARDWARE DISPLAY REGISTER 

2215 003556 022777 177777 :: TRY TO REFERENCE HARDWARE SWR 

2216 003564 001012 j BRANCH IF TIMEOUT TRAP OCCURRED 
2217 3;AND T IS NOT = -1 
2218 003566 o00403 BR 65S ?:BRANCH IF _NO TIMEOUT 

e219 903570 012716 003576 64S: Mov #655, (SP) ::SET UP FOR TRAP RETURN 

eel pose5e Boos O1 001140 65S: MOV #SWREG, SWR ;;POINT TO SOFTWARE SWR 

2222 003604 012737 000174 OOl14e MOV #DISPREG, DISPLAY 

2ee3 003612 012637 O00004 66S: MOV (SP)+,aHERRVEC ;;RESTORE ERROR VECTOR 


reneree, _ OSKLS co PRT4 
Oe-DEC-7 


CZR608.P 


eect 


2234 
2235 





2R2Ne TORRE 


0 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 


Wt oc 
oor 


132737 
Bi2737 


005037 


10:00 


001222 
000200 


001236 
003250 


177777 
034062 
003730 
ooco4e 
001234 
001140 


000001 


177777 


3671 
01 


043551 
001160 
001000 


001160 
043607 


001265 


MACY11 


001235 
001140 


oooo4e 


000001 


000176 


001134 


003246 


001160 
001270 


001160 
001264 


FO4 


30(1046) O2-DEC-77 10:20 PAGE 44 
INITIALIZE THE COMMON TAGS 
CLR SPASS CLEAR PASS COUNT 
BITB BAPTSIZE,SENVM ::TEST USER SIZE UNDER APT 
BEQ 67 ::YES,USE NON-APT SWITCH 
-_ MOV aS G, SWR ::NO,USE APT SWITCH REGISTER 
CLR oERRONT 
-SBTTL TY TYPE PR OGRAM NAME 
;; TYPE T OF THE PROGRAM IF FIRST PASS 
ice 1 ;;FIRST TIME? 
BNE ;;BRANCH IF NO 
CMP #SENDAD, J842 ::ACT-11? . 
ea 6 3 3 Bren 2’ EFRING 
.SBTTL GET VALUE FOR SOFTWARE SWITCH REGISTER on menses 
BNE Os  BReNeH RES ie 
cHPe SENV, #1 WE RUNNING UNDER APT? 
one SHR, #SUREG He: ae SUT TCH REG SELECTED? 
GTSHR a +s BRON Co CUR SETTINGS 
708: MOVB #1, SAUTOB ;;SET AUTO-MODE INDICATOR 
; BR 68S OVER THE ASCIZ 
iib38: ASCIZ <CRLF>/RK611 orski bes DIAGNOSTIC: PART 4 CZR6DB0/<CRLF> 
d INC a-1 ;TYPE RUN TIME MESSAGE FIRST PASS ONLY 
ONE OPROO& 
2s: CMP bie SRTFLG ; CHECK IF PARAMETER START 
BNE 15$ ONTINUE SET 
S$: TYPE OPROO1 1 HOPE “RKG&11 BUS ADDRESS ( ) =" 
OV $BASE,-(SP) SA VE SBASE FOR TYPEOUT 
TYPOC ::G0 TAL ASCIICALL DIGITS) 
TYPE , OPROO2 
RDOCT ;GET VALUE 
MOV (SP)+, STMPO 
BEQ ? CHECK IF <CR> 
CHF #160000, $TMPO CHECK IF IN 1/70 PAGE 
MOV MPO, SBASE ;LOAD NEW BUS ADDRESS 
7$: TYPE ROO3 : TYPE “RK611 VECTOR ADDRESS ( ) =" 
MOV $VECT1,-(SP) :GET VECTOR ADOR ESS FOR TYPE OUT 
BIC #160000, (SP) :CLEAR PRIORITY BITS 
TYPOC 
TYPE , OPROO2 
RDOCT ;GET VALUE 
MOV (SP)+,STMPO 
BEQ 10s ;CHECK IF <CR> 
CHP #1000, STMPO :CHECK IF LEGAL 
MOV STMPO, SVECT1 $1,080 NEW VECTOR ADDRESS 
10S: TYPE , OPROOY TYPE “RK611 PRIORITY ( ) =" 
CLR +(SP) MAKE FOOM ON THE STACK 
MOVB SVECT1+1, (SP) ee PRIORITY 


SEQ 0044 


GO" 


CZR6DBO RK611 OSKLS CTRL PRTY MACYII1 30( 1046) 02-DEC-77 10:20 PAGE 4S SEQ o04sS 
CZR608.P11 02-DEC-77 10:00 GET VALUE FOR SOFTWARE SWITCH REGISTER 
281 154 906216 ASR (SP) ;SHIF RIGH S BITS 
e8e 1 B02 16 ASR (SP) 
1 006216 ASR (5P) 
1 16 ASR (SP) 
164 1g ASR (5P) 
. 1044 TYPOC 
é@ 1 1 1 043551 TYPE , OPROO2 
2288 174 10441 RDOCT :GET VALUE 
gee9 26 001160 MOV (SP)+, STMPO 
14 BEG 15s ;CHECK FOR DEFAULT 
ee3 Os 4 187 000007 001160 chr #7 STMPO ‘CHECK IF LEGAL 
ee3e 14 73 000004 001160 CMP #4, STMPO 
s5qc se 1335 11 eu? 108 SHIFT S BITS LEFT 
te . 
eee Ghies Boeser BBlieD Bet is : 
pousa0 poesss 001160 ASL $TnPO 
001160 ASL 
2300 001264 BIC ieee $VECT1 ;GET PRIORITY BITS 
301 h il 001265 BISB veCTi+l 
a 004264 O01 1264 003240 15S: MOV 
8303 goue7e O4e737 180000 003240 BIC Hehe ;GET VECTOR 
113737 1265 003242 MOVB sve cr !, KKPRI :GET PRIORITY 
2305 004306 013702 001270 MOV :SET ’611 BASE 
308 le 905 7? 001202 CLR Has as ‘CLEAR ESCAPE 
23 16 7 034366 NEWPAS: JSR PC, PARCHK tENABLE MEMORY PARITY 
2308 322 012746 o00000 MOV #PRO, -(SP) ?LOCK OUT INTERRUPTS 
2309 26 012746 004334 MOV aTST1,-(SP) 


0043 
2310 O0433e o000002 RTI 


CZR6DBO RK611 OSKLS CTRL PRT4 


CZR608.P11 


WN OWO NOW £ wre 


004564 


g 
: 


BRereeeesacce eeeeeeeree 
BRT RATT AY REREESRESD: 
SELES OGRE wSS 


ANSSSASS 


= 
<= 


= 


O02-DEC-77 10:00 


MACY11 


001200 
000000 


000000 


003166 


003170 


O04 


30(1046) O2@-DEC-77 10:20 PAGE 46 
xeTYPE C INSTRUCTION’S DRIVE MESSAGES 


-SBTTL ##TYPE C INSTRUCTION’S DRIVE MESSAGES 


5 96 3 36 A 6 2 SE EA aE AE A a a a a J a a a a a a a a 
TEST 1 READ DATA SEEK MESSAGE 


tk 

+ CLEAR THE we Feet te tS a rage ee Se atA + -—" 
- CONTROLLER IN D SUE A READ DA 
* 
* 


a Bint ob ona LAE B Aer WP SBRoe kB 


SURE IT IS GENERATE 
pevgayeenernernnrnennenrnnennrnnnsee 


OPE 
ce ll 


i CURR CHAD la grrowerte vom 


: ) iL DUMMY ADDRESS 
MOV és 277 » KDC (Re) CYLINDER ADDRESS REG. 
MOV £ ( ; i bad" TRAC 
nov a7 RKtSe( Re) LORD 1 RDDATA WITH CDT SET IN 
ea cae TEBE 
MOV #3%44+2.RO 4gock IN DRIVE MESSAGE 
1S: MOV #OMD!MCLK, RKMRI (Re 
MOV #DMD, RKMRI (Re) 
DEC R 
BNE 1 
MOV RKCS1(R ), 7.68 ST Cc STATUS REG. 1 
MOV RKMRe (Re); T. ST NT . 2 (MESS A) 
MOV RKMR3 (RO) | T. ST MAINT REG. 3 (MESS B) 
MOV #COT!CFMT!RDDATA‘{E.CS1 ;LOAD EXPECTED CS1 
MOV #S.SEEK!S.FMT!70007,—.MR2 ;LOAD EXPECTED MR2 
MOV #37760,E.MR3 ite EXPECTE! 
CMP E.cS1,¢.cS1 >CHECK C one STATUS REG. 1 CORRECT 
BEQ es ?YES, CHECK MESSAGE A 
ERROR 3 iS) ABNGORREC 
MOV #CCLR,RKCS1(R2) ;C RK61 
BR TSTe ?;GO TO NEXT TEST 
2S: CMP E.MR2,T.MRe ;CHECK MESS A T 
BEQ 3$ ;YES CHECK oMeeence B 
ERROR 4 :MESS A 
3S: CMP ENR, T.MRS CH ox" S56 CBRE SRRECT 
BEQ $T2 : TO NEXT TEST 
ERROR 5 these B INCORRECT 
s + PER KGESGRK GEER EERE REE EEK REEL SRE REAR RARERRERRRE RAR RA RA ARARARA KLEE 
jkr Te WRITE DATA SEEK MESSAGE 
i CLEAR RK611 ROMRERYERNCE WITH A CONTROLLER CLEAR. PUT 
1a CONTROLLER TN Ma MO ISSUE A WRITE DATA OF 
1x ONE WORD TO AN RKO& IN es SECTOR FORMAT, CYLINDER 1777, 
1% TRACK 7. DRIVE 7. CLOCK IN SEEK MESSAGE. CHECK IF 
i PROPER MESSAGE IS ASSEMBLED. 


SES 004% 


= = — ee a 


CZR6D0BO RK611 OSKLS CTRL PRTY 
CZR60B8.P11 O02-DEC-77 10:00 


367 ;* 


MACY11 30(1046) O2-DEC-77 10:20 PAGE 47 SES 0047 
Te WRITE DATA SEEK MESSAGE 


é mpg 0” arrnganpees atemmene Pap mapa iemmapaicieD FR tome 
3 pogoe 001 he #SO. .STIMES ::D0 SO. ITERATIONS 
237 1 Senstsne + OOO RK EL BASE 
533 15 OL . nov BOE ACME Ines. TBUF RKELT_IN DIAGNOSTIC MODE 
5353 6 O1 eared 90008 MOV #-1 Awe cRe) L WORD Ab UNT 
23 1 Selb MOV F, (R2) $b BUS ADDRESS 
237) 1 1 000020 MOV #1777, (Re)’ ; CYLINDER ADDRESS REG. 
23 40 Ol 00 oo0006 MOV a4 RKDA(R2) ;L RACK 
2378 46 ig 900010 MOV % Ese(Re) +L ORIVE NUM. 
e373 s4 Ol 12023 MOV acbT!¢ NT !WRDATA, RKCS1 (Re) 3 ISSUE WRDATA WITH CDT SET IN 
638 01 900016 MOV #3*4+2, RO ‘CLOCK IN DRIVE MESSAGE 
352 1 40 oO00026 1S: MOV SOMDI AOL RKMR1 (Re) 
e383 000040 o00026 MOV #OMD, RKMRI (Re) 
ese Soiree BlbEae at 
1 140 MOV RKCS1(R2),7.CS1 ;STORE COMMAND STATUS REG. 1 

5385 714 016237 poops pes tee MOV RK (RS) °T: + STORE MAINT REG. 2 (MESS A) 
2 7 1 170 MOV RKMR3(Re) TMS i STORE MAINT REG. 3 (MESS B) 
S 7. 1 ege 200 MOV #CDT'CFMT! ALE.C ei CTED CS1 

7. 1 le 226 MOV #S.SEEK!S.RT tS ERT so00> : =LOAD EXPECTED MR2 
2331 744 O12? 7760 003230 MOV #37760,E.MR3 ;LOAD EXPECTED MR3 
2 37 003140 CMP E,c51,t.¢s1 ‘CHECK COMMAND AND STATUS REG. 1 CORRECT 
2393 7 001405 BEQ YES, CHECK MES A 
2394 7 104008 ERROR :CS1 abcd RECT 
6336 764 762 100000 000000 MOV #CCLR,RKCS1(R2) ;CLE Ly 
e336 2 ie TST3 +:GO TO NEXT TEST 
2398 004774 37 003226 O03166 2S: Cc E.MR2,T.MR2 5 CHECK SS A CORRECT 
g3 9050 1401 BEQ os iE ¢ CK SAGE B 

04 10400 ERROR *MESS NC CT 
2401 005006 023737 003230 003170 3s: MP E.MR3,T.MR3 *CHECK MESS B CORRECT 
e402 005014 001401 BEQ TST3 >; YES, GO ON TO NEXT TEST 
e403 005016 104010 ERROR 10 :MESS’B INCORRECT 
2405S s% REL KKLSEKRERKE EERE REE EE SRE R REAR RRA ARERR AER ARERR AAHEAAHLA HEE 
ei0e 5 RT T 3 SEEK MESSAGE FOR WRITE CHECK 
2408 i CLEAR RK611 CONT ER WITH A CONTROLLER CLEAR. 
2409 1 PUT CONTROLLER IN DIAGNOSTIC MODE. ISSUE A WRITE CHECK 
2410 & OF 1 WORD TO AN RKOG IN 24 SECTOR FORMAT, 
2411 ti CYLINDER 1777, HEAD 7, DRIVE 7. cLOck 
e41e i IN SEEK COMMAND. MAKE SURE CORRECT MESSAGE 
eni3 i IS ASSEMBLED. 
2415 ce REESE SKRRERSRERERERERRAA SKLAR RRA RARARRRRERLARE RRA ARAL HRALALAE 
2416 ooS020 o00004 tST3: SCOPE 
2417 005022 737 oo00SO0 001200 MOV #SO, STIMES ;;D0 SO ITERATIONS 
euig 905030 001270 MOV SBASE , Re ‘(OAD RK611 BASE 


R 
#OMD,RKMRI(Re) ;PUT RKB11 tn DIAGNOSTIC MODE 
177777 o00002 MOV #-1, RKWC(R2) 


Ole 

013702 . ; 

Bis?bs 100000 9000000 MOV #CCLR,RKCS1(R2) ;CLEAR RKB1 

012762 ;LOAD UN 

012762 O5S5216 oO00004 MOV #BUFF , RKBA(R2) ;LOAD DUMMY BUS ADDRESS 


CZR60B80 RK61i OSKLS CTRL PRTY 





CZR60B.P11 Oe-DEC-77 10:00 

Ae 

Fa si 6 Bis 00000 

37 1 012031 

aril 012700 Oo00016 

bbe t Jl Ay 

Se Geis fier Mae 

az? i t 12031 

ae Bei Slee tele 
e4 64 

1 


Sete PrewFoowee 


“5 f= 100000 
ue 3737 003226 
sie £808) 
ea o0Se 104012 
48 0052 023737 003230 
e449 246 001401 
eso 005250 104013 
451 
24Se 
2453 
24SY 
gee 
456 
2457 
2458 
24s9 
sist 
Be o0sese2 0004 
2463 005254 012737 o0006e 
4 O0Se62 013702 001270 
65 005266 O12? 400006 
005274 167 004 
2467 005 O1 7 77777 
2468 00531 127 Sel 
eu69 00531 o15768 0017 
eis ee 
545] Boe sae b15e Bodo? 
ate 00 Ole762 012021 
2474 3 127 0156 
2475 3 Bi3e 0440 
2476 005360 Ole762 O00040 
2477 005366 005300 
2478 005370 001370 


MACY11 30(1046) 
T3 


003166 


003170 


001200 
000000 
000026 
o00000e 
000004 
000020 
900016 
001 
000000 
000026 
000026 


02-DEC-77 10:20 PAGE 48 
SEEK MESSAGE FOR WRITE CHECK 
MOV #1777, RKDCYL (RE) *LOAD CYLINDER ADDRESS REG. 
MOV #3400'RKDA(R2) ;LOAD TRACK 
MOV #7, ,RKCS2 (Re) ;LOAD DRIVE 
MOV sCOT!CFMT!WRTCHK,RKCS1(Re) ;ISSUE_WRTCHK WITH CDT SET IN 
: 4 SECTOR FORMAT 
MOV #3*44+2, RO ‘CLOCK IN DRIVE MESSAGE 
1S: MOV #OMG!MCLK, RKMRI(R2) 
MOV ,RKMRI (Re) 
DEC RO 
BNE 1a 
MOV RKCS1(R2),7.CS1 ;STORE COMMAND STATUS REG. 1 
MOV RKMRe (Re) , T. Me i STORE MAINT 8 (MESS A) 
MOV RKMR3(Re),T. MRS 3ST MAINT (MESS B) 
MOV SCOT'CFMT!WRTCHK.E.CS1 ;LOAD CTED CS1 
MOV #S. SEEK!S. FMT! 70007 ORE :LOAD XPECTED MR2 
MOV #37760,E.MR3 3L EXPECTED 
CMP E.CS1,1.CS1 :CHECK COMMAND AND STATUS REG. 1 CORRECT 
BEQ os XE , CHECK MESSAGE A 
ERROR I1 351" INCORREC 
MOV HCCLR, RKCS1(R2) CLE RKB1L 
BR TST4 :;GO TO NEXT TEST 
2s: CMP E.MR2,T.MR2 ;CHECK MESS A CORRECT 
BEQ 3$ :YE CK MESSAGE B 
ERROR i2 ?MESS A INCORRECT 
3S: CMP E.MRS, T.MR3 ;CHECK MESS B_ CORRECT 
BEQ STY ?:YES, GO ON TO NEXT TEST 
ERROR 3 these’ B INCORRECT 
$ = REKKKERRRKERRARSKRAREARAAARAREREARAERASRRKRERRRRRARHRERKRAAAKAAAAREE 
;ATEST READ DATA CLEAR MESSAGE 
1a CLEAR THE RK611 WITH A CONTROLLER CLEAR. PUT THE 
1a CONTROLLER ON O1 nee BREAD abArA TO AN 
i IN 24 Wg eta one Re 1777 DRIVE 
* i Oe FORD COUNT 177777. SEEK HEseact AND THE 
is eee MESSAGE AND MAKE gor Nou (ER MESSAGE IS CORRECT. 
H Tsay enlace apa esr se ere amnesia rr tates 
MOV #SO. ,STIMES 3300 SO. ITERATIONS 
MOV Re : OAD. RK611 BASE 
MOV SCCLR{RKCSI(R2) ;CLEAR RK611 
MOV #OMD, RKMR1 (Re) Aor RK611 tn DIAGNOSTIC MODE 
MOV 8-1, RKWC (Re) ; LOAD WORD COUNT 
MOV SBUFF,RKBACRE) ;L DUMMY BUS ADDRESS 
MOV #1777, RKDCYL(R2)’ :LOAD CYLINDER ADDRESS REG 
MOV #3400 RKDA(Re) ;LOAD TRACK 
MOV és2(Re) ;LOAD DRIVE NUMBER 
MOV scOT! CFHT!RODATA, RKCS1.(Re) ; ISSUE COMMAND WITH CDT SET IN 
; ed SECTOR’ FORMAT 
MOV #27.% ‘LOAD COUNT TO LOAD DRIVE CLEAR 
1S: MOV SoM MeLK ROKMR (RES 
MOV #DMD, RKMRI (Re) 
DEC RO 
BNE 1$ 


SEQ 0048 


c RK611 OSKLS CTRL PRTY MACYI1 30(1046) O2-DEC-77 10:20 PAGE 49 4 
eSRebe Pit Ba “becs7? T4 SEQ 0049 





10:00 READ DATA CLEAR MESSAGE 
Boeqa8 Bi posiee HOV REE Re Tee aOR COUNT RES cress ay” 
we flee freee Gece RY EOHCeer astra ie'GeL tine Enbectet EST © 
as 21467 BoSseE nov #S.CLR!S.FMT! me re £005 EXP efED MAINT REG. 2 
43 4 37 003200 003140 cnr E,S1,T.CSi $CuecK Go Hn oft STATUS REG 1 CORRECT 
444 104014 ERROR 14 sCS1 I ORREC 
446 giz” 100000 oo0000 #CCLR,RKCS1(R2) ;CLE i 
1 TSTS ?;G0 TO TEST 
g 456 3737 003226 O03166 2S: CHP a MR2, T.MR2 ; CHECK oftess A CORRE CT 
4 uGe 01 ERROR 15 ines A api CT 
4 4 3737 003230 003170 3S: C E.MR3,T.MR3 :CHECK MESS B CORRECT 
2495 005476 00140 BEG TSTS i pYES, ON TO NEXT TEST 
S136 005500 104016 ERROR 16 :MESS’B INCORRECT 
2498 $3 REKKREERKKRKREARKA RRA SRSA ARERKKRAARERAAERRAAREFERERERERRAAKKRRRKHAEE 
eae. :&TEST S WRITE DATA AND DRIVE CLEAR MESSAGE 
2501 $a CLEAR RK611 CONTROLLER WITH A CONTROLLER CLEAR. PUT 
e50¢ 2 i CONTROLL: A IN NATRTENENCE MODE. Teche A WRITE DATA OF 
£33 E PRRcuO#P 8,00 HOS IB. areDOR AOSUaae efO-GRTVE CLEAR 
os is CHECK IF PROPER BRIVE CLEAR REScace IS ASSEMBLED. : 
sabe p0ss02 oo0004 ; ee 
25039 005504 012737 oo0062 001200 “MOV #SO. ,STIMES ;;00 SO. ITERATIONS 
2510 g05512 013702 00 MOV SBASE , Re :LOAD RK611 BASE 
2511 5i6 0127 po0000 MOV SCCLR-RKCSI1(R2) :CLEAR RKB11 
e5le posbes ot o0009 p00026 MOV #OMD, RK 1 ) N DIAGNOSTIC MODE 
251 1 noood2 8-1, RKWC (Re) COUN 
2514 B40 Ol 000 MOV : (Re) BUS ADDRESS 
2515 1 want MOV #1777,RK CYLINDER ESS REG. 
2516 5554 0127 00 o00006 MOV #3400’ RKDA(Re) K 
251 oie? 7 10 MOV a? RK ESE (Re) R 
e518 127 12023 000 MOV aCOT! CFMT!WROATA, cs (R2) | 3 ISSUE _COMMAND WITH CDT SET IN 
2520 ooss 12 000156 MOV #27. #442, RO ‘LOAD COUNT TO LOAD ORIVE CLEAR 
2521 127 goo#4o oo00026 1S: MOV #OMD!MCLK, RKMR1 (Re) 
eoee e7 000040 000026 MOV BOM, RKMRI (Re) 
2524 00137; BNE $ 
2525 1 3140 MOV RKCS1(R2),T.CS1 i$ COMMAND AND STATUS REG. 1 
16237 34 3166 MOV RK e(Re), 1. MRE :STORE MAINT. REG. 2 (MESS A) 
1 3170 MOV RKMR3(Re)’T.MRo ;STORE MAINT. REG. 3 (MESS B) 
44 Ole 1202 3 MOV #CDT!CFMT!WRDATA‘E.CS1 ;LOAD EXPECTED CSi 
sess Gere Sherer Bolte COSerS =O gait. FT: 700 eo MBboe NED etn cneg, ENT RES: 2 
ge 1 BbEY Ge37 32 003200 003140 che E,51,7.CSi CHECK CONN NO STATUS REG 1 CORRECT 
2533 005674 104017 ERROR 17 ?CS1° INCORRECT 
2534 005676 O12762 100000 ooD0000 MOV #CCLR,RKCS1(R2) :CLEAR RK611 


CZR6080 RK611 OSKLS cm PRTY 
CZR6D08.P11 Oe-DEC-77 10:00 


3$ 
% a i? 
40 28 Gea737 003230 


Con 
a 
28 


i) 
R 
8 
Tv 
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: 
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vias ia 
Sorul 
£ 
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RS RRR 
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e589 
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uw 


BOE s ARR ERRRAGL LS 


MACY11 


003166 


003170 


000026 
000026 


003140 
nape 


003166 


003170 


O4 


30(1046) O2-DEC-77 10:20 PAGE SO 
TS WRITE DATA AND DRIVE CLEAR MESSAGE 
BR TST6 ;;GO TO NEXT TEST 
2s CNP “gee ee te 35 S 6 CORRE cT 
ERROR 0 ?MESS A INCORRECT 
3S: CMP E.MR3, T.MR3 + CHECK Aaeos 8 1S next cnn 
FE8or 21 tS" g cT 
8 « LEKKEKRKRKRESAKESEEREREAAKRAAAKAARAARAAAERERARARARARERRRARKKRRARARARRAAREE 
; ATEST 6 DRIVE CLEAR MESSAGE FOR WRITE CHECK 
i om oRKEL! CONTROLLER WITH A CONTROLLER caapive 
i ie Lea 9 AN RK Pie EN aN rev SECTOR FORMA 
e VE CLEAR. 
f Fee 8 08 Bn an 
neon banca ar 
#SO. ,STIMES ;;00 SO. ITERATIONS 
nov ae eRe S1(R2) LOAD RKEL1 
nov aH fcr (Re) :BUP RELL ‘te N DIAGNOSTIC MODE 
MOV SBUFF , RKBA(R2) ; COAL Bunny Bus ADDRESS 
MOV 8 722 » KDC (Re) YLINDER ADDRESS REG. 
HOV : eeecRe) ; itt DRIVE NUMBER 
MOV WCOT!CFMT!WRTCHK, RKCS1(RE) 5 ISSUE COMMAND WITH CDT SET IN 
MOV #27. #442, RO LL onD B5uNt TO LOAD DRIVE CLEAR 
1S: MOV Sond tne K RKMR1 (Re) 
MOV #OMD , RKMRI (Re) 
one St«*dS 
MOV RKCS1(R2),T.C ST COMMAND AND STATUS REG. 1 
RK ; °T: :ST MAINT. REG. : (MESS A) 
HOY RODTSGEATIUATCIK'E Col  SLOAD EXPECTED cal ~ 
HOV aS CL 'S.FMT! 5 - she joe "EXPECTED. MAINT REG. 2 
CMP E- Cel, T.CS1 skOBR COMMAND Ono STATUS REG 1 CORRECT 
BEQ 2s ?YES, CHECK MESSB 
ERROR 22 CS ORRECT 
MOV #CCLR,RKCS1(R2) 3CL 611 
BR TST? ; - TO NEXT TEST 
2s: CNP E NR2, T.MRe CHEE Fe A 8 CORRECT 
RROR 23 ive g § ORRECT 
3s: CHP E.R, T.MRS =F CHECK HESS. B CORRECT 
ERROR 4 :MESS’B INCORRECT 


SEQ 00S0 


Fn 


2 ey — OSKLS CTRL PRT4 
CZR608.P O02-DEC-77 10:00 


ay 


o 
3 


Bete 


LIRR TTR 


NOW LSW-O 


ae 
i i 
eet 
1 
12 01 
Bo3190 
33 Be3e8 093140 
34 006360 ooooc0 
= 003166 
ea 003170 
Aah 
44 
64S 003220 
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*#HE 


<=: 


1S: 


6$: 


78: 


15S: 


02-DEC-77 
ADER GENERATION 


-SBTTL ##HEADER GENERATION 
Ne eee eee ettn ar te emnannaees 


CLEAR THE RK611 WITH ° nee ts oT ary 
alg IN DIAGNOS 


eeCFoR 0. chock. 4 
Fase HOY ES EoRReCT: REPEAT FOR CYLINDERS 


s ERLE ELAR EE REE EEE ERE ERE KAALARAEAALE LALLA ERLRARLAALLRAALLSRERE 


$817; 


10:20 PAGE S1 


HEADER GENERATION (PART 1) 


Pm aL. 
MeSBcHESIER ERE Bae REDRER PectERD 


#10. ,STIMES :D0 10. ITERATIONS 
BASE, Re 


Gave ee ETC TIOER 800 og 


SiS SLPERR LORD COOP oh ERROR LOCATION FOR 


ati TEST 
PC, CALHOR ATE EXPECTED HEADER 
#CCLR, RKCS1(Re) :ECERR 


#OMD, RKMR a Pur PKE AL “Hee MAINTENANCE MODE 
SBUFF ,RKBA(R2’ it “nopRESS 
Lice a tes 
sesitc KR bee SCUNT UNTIL. H ADER GENERATION 


RAS 


cS1(Re), T.CSt $ STORE COMMAND. AND STATUS REG 1 
RMS CRS)’ TAS STORE EER B No BORD 
F,CS1,T.CSi es, as QBNO, STATRUS, B SR cf CORRECT 
es 
ee ISLEPA CONTPOLLER, WORD OF HEADER 
E.NRe, T.MR2 Ree ae FIRST WORD OF HEADER CORRECT coy 
ee T.MR3 ieee HOR oF FEROER or Rect CORRECT 
igs ots ASHECK TF hae 0 ON ERROR 
SECON 
#635, E.DcvL ra tas VALUE’ 0 Oo ADER OVERFLOW DETECTION 


SEQ 00S1 


Ce 





NO 


c RKbil OSKLS CTRL PRT4 MACY11 30(1046) O2-DEC-77 10:20 PAGE Se o0s2 
Sat eee C-77 10:00 17 HEADER GENERATION (PART 1) =e 
2647 432 005237 003220 INC , sUSE 634 
436 737 001777 003220 16S: CMP @ OPS cE.DcvL :CHECK IF FINI 
444 BHIS :NO, GO TO NEXT CONFIGURATION 
ig 


SenqueRnEREenen esse tee eee 
T 10 HEADER GENERATION (PART 2) 


ites 

. or a pa RK611 et DpRGNOST WITH A CONTROLLER CLEAR. 
PSU IA AA SLE BPFomatmatiseee Bek 
:* Rect STER 
;* 


Chek ras NTENENCE 2 SAND HAIN ENRRCES aeareveR | 
THE HEADER IS CORRECT. REPEAT FOR HEADS 1-7 


Pt tatatatat aL 
DOV LW OSD 


eae 


ee 
T10: § 
001200 MOV #10. ,STIMES 0. . TTERATIONS 
4 MOV $BASE 
Ss CLR E.ocvt Yur NDER_ ADD 
CLR ‘DA qa K AND SECTOR 
MOV #RODATA,E.CS1 T At FORM At 
#15, SLPERR : LOAD LOOP ON ERROR LOCATION FOR 
: SUBTEST LOOP 


1S: 
CALL ATE EXPECTED HEADER 


Bey 
ane 







003200 
001110 
oooo000 MO #COLR,RKCS1(R2) ; oe 61 
e674 MOV #OMD,RKMRI(R2) ; RK Hn MAINTENANCE MODE 
75 MOV 8-1 RKWC (Re) 3L 
2676 o4 MOV SBUFF,RKBA(R2) :L purity Bue T ADDRESS 
MOV - DEVE, RKDEYL (Re) : OAD CY CYLINDER NUMBER 
O06 MOV é DA(R2)  3L RACK AND cTOR 
00 MOV ,csl RKCSI(R2) 3L COMMAND 
MOV #69. #442 *LOAD COUNT UNTIL HEADER GENERATION 
go0026 Ss: MOV #OMO!MCLK, RKMR1 (Re) 
026 MOV #DMD, RKMRI (Re) 
Bae t«dSS 
903140 MOV RKCS1(R2),7.CSL ; STORE COMMAND OMMAND AND STATUS REG 1 
03166 MOV RKMR2 (Re), T. ST RE FIRST HEA HEADER WORD 
003170 MOV RKMR3(Re)°T.MR3 ; STORE 
003140 CMP E.CS1,T.C51 ; CHECK Cc WOND TATRUS REG 1 CORRECT 
we EO ?YES, CHECK FIRST LINE OF HEADER 
ic | RROR jCS1 I Cc 
2691 12762 100000 oo0000 MOV #CCLR,RKCS1(R2) ;CLE oy LER 
gb 000412 BR 1 :YES, CHECK SECOND WORD OF HEADER 
2694 923737 003226 003166 65: CNP EMR, T.MR2 CHECK CK IF FI T WORD OF filth BF WERDER Connect 
seep 4 OBddat ERROR 31 i tGRe ST CHORD oF READER IN INCOR 
2697 3737 003230 003170 7S: CMP E.MR3,T.MR3 *CHECK IF SECOND OF HEADER CORRECT 
e529 1401 Q 3 > YES, CHECK IF NO OP CON ON ERROR 
e639 78 104032 ERROR 32 *SECOND WORD INCORRECT 
700 0067 104415 15S: SCOP 1 ;LOOP_ON ERROR 
2701 006702 105237 003207 INCB E.DA+1 : INCREMENT TRACK 
2702 006706 122737 000007 003207 CMPB #7,E.D0A+1 :CHECK IF FINISHED 


BOS 
(PAR 








Cc RK611 DSKLS CTRL PRTY MACYI1 30(104%6) 02-DEC-77 : 

ESRERE yi 02-DEC-77 10:00 3Pi6 HEADER GENERATION } “i 33 = ose 
e703 006714 103274 BHIS is ;NO, GO TO NEXT CONFIGURATION 
2708 33 KREPREAALEREREL ERE RAE YK EMA KLEE REA KLR EKER E RE HHEE KH ELERLE REDE E HE ER 

208 j ATEST il HEADER GENERATION (PART 3) 

703 'T SHEMEGTIR MEL! GOUTROSSER Taine COUTEOE EFAS Bara UP 
e710 i ONE WORD FOR AN RPE IN SecTor Fi aye CYLINDER 0 HEAD 
5th + WEEK HRINTENANEE REGTSTER 2 BNO MAINTE ive glee eee he 
ae i 9 MAKE ARE HERDER 3 CORRECT. RE Me FOR SECTORS 1-25. 

erie 71 ; “egg 2" generac enema a tse canmnsess tee aamimmminnagele <r aor se SERS 

71 7 Ote7 a7 o00012 001200 "MOV #10. ,.STIMES ::D0 10. ITERATIONS 

2718 096720 184 berg MOV St Hass 61 

he ee ae te E-Bert RTE ESE Feat RSS Sc ron 

gs? 742 Ol 37 1 003200 MOV #RODATA,E.CS1 tN TiACt FORMAT 

cee 750 Ole7 006756 001110 MOV #15, SLPERR ;LOAD LOOP ON ERROR LOCATION FOR 

703 ; SUBTEST C BoB 

7 1$: 

oe BS) SEACANPR ss cmey FERRER Ree PeCTES MEAOER 

4 mov ‘ , ,RKMRI (Re) iP RK6 in MAINTENANCE MODE 

2750 OV #BUFF , RKBA(R2) it OAD 

731 MOV : VE, RKOCYL (Ra) . YLINDER NUMBER 

e73e v s DACRE)  3L RSCK CTOR 

7 MOV 7CS1,RKCS1(R2) 5L COMMAND FORMAT 

ead a nov H69 wee) saad 4b 9A0 COUNT UNTIL HEPDER GENERATION 
2736 7 MOV #OMD, RKMRI (Re) 

ef me 

erat Rey GEGHLSRS}. TGR) STORE PROMO. BO, STEIES FES | 

2741 70 MOV RKMR3( }+7-URS ; STORE CARB ND WORD 

emis Berits Bice gp Egle TeCBh CK COCOA RRE OP HebeR CORRECT 
2744 O07112 33 ERROR 33 CE?” INCORREC 

274S 007114 62 MOV #CCLR,RKCS1(R2) ;CLEAR CONTROLLER 

oe 007122 le BR 1S$ :YES, CHECK Scat WORD OF HEADER 
2748 007124 37 6S: CMP E.MR2,T.MR2 ;CHECK IF FIRST WORD OF HEADER CORRECT 
cree arts Baas Fron 38 Miaer"Uas fe REGOER WeESaee HEADER CORRECT 
278 007136 Gea? 37 003230 003170 7S: cH E MRS, T.MR3 ene uti COND WORD OF HEADER CORRECT 
2753 Bosiue nantes ERROR 3 ? SECOND THeOR RECT 

2754 907150 104415 1SS: SCOP1 *LOOP ON ERROR 

2755 7152 105237 003706 INCB €.DA : INCREMENT SECTOR 

2756 007156 122737 O25 003206 CMPB #25,£.DA :CHECK IF FINISHED 

2757 007164 103274 BHIS 1$ :NO, GO TO NEXT CONFIGURATION 


cgneeo, a OSKLS com PRTY 


CZR6D8 . P 
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888 
8888 
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SRERSAANEE 
EReoe oe 
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Oe-DEC-7 


10:00 


003226 


003230 


010000 
010000 


COS 
MACY IL sa HEADER GENERATION (PART 4) 





003200 
003200 


18: 


6S: 


7$: 


15S: 


Cee ge agaaggen neta ap nein ong a ~ a emanate 
TEST 12 HEADER GENERA 


TION (PART 4 


CLEAR THE RK611 CONTROLLER WITH A petra CLEAR. 


eH sEPoR's Eeolt Thnfues AEP Pee te 


eta 
CK MAINTENANCE RE io MAIN TENANC 


ReCisieesa 10. Q MAKE SURE NEROER IS CORRECT. REPEAT FOR 24 


s RELEEEREAEEEE SESE ERLE ELLA AAE EA RAARAAAARKLARRAREERRA ALARA RARK ELAS 


haere 


#50. ,STIMES :00 SO. _ ITERATIONS 
$BASE, R2 ‘LOAD RK 


- pave HM HEL HSE FRAPS "Bron 


#RODATA,E.CS1 
#1 OSL PERA ‘i BAa! PSB of LOCATION FOR 
; SUBTEST LOOP 


eeetR Fikes! cme | iat TE EXPECTED HEADER 


#OMD aRKPRL ( me) RK611 IM MAINTENANCE MODE 
#BUFF RKBAtRe) Bonny Bus ADDRESS 
tachi CYLINDER NUMBER 
DACRE) sk SECTOR 
CS1,RKCSi(R2) ;LOAD COMMAND AND T 
§. #44+2.R ib orO COUNT UNTIL HEADER GENERATION 
'MCLK, RKMR1( 
#O0MD, RKMRI (Re) 
oe 
cs (R2),T.C ao rat REG 1 
RKMRe (Re); T. FIRST HE 
RKMR3( Re)’ T.MR 
ee ATRUS REG 1 1 CORRECT 


ao rhe Pear} Line OF HEADER 


#CCLR, RKCS1(R2) sCLEAR CONTROLLER 
1S$ YES, CHECK SECOND WORD OF HEADER 


E.MRe,T.MRe 5 CHECK IF FIRST WORD OF HEADER CORRECT 
es creck a fe ptt ORO RR Fo HERDER CORRECT 


E MRA, T.MRS Ck IF se tted Neteet, OF HEADER CORRECT 
weFtgE-CSi ia "is. FIN RASHED 


wCFMT,E.CS1 thee? 24 SECTOR FORMAT 


(pavds0 
aT a 
WOnoU 


Se 


Bea 


ii 


bb hb bh he he 


SS, 


hi 

W 
2 
= 


SHR 
awa aE en 


uw 
ne 


e030 03 0 


eee 
: 
% 
ok 


2863 007676 
Q 
See? bor? 
2868 


7720 
e869 007722 
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-SBTTL ##NPR TRANSFER FOR WRITE DATA 
ss eT a eee 


Teri Titi titi tit itittiititiititititittiiitiiitiiiiiiiiiiiicir ig) 


téT13: Sc 
MOV #SO. ,STIMES ;;00 SO. ITERATIONS 
MOV SBASE , Re : OAD PKG} BASE 
MOV acc RKCS1 (Re) ; RK611 
MOV ,RKMRICR2) |; RK611 IN DIAGNOSTIC MODE 
MOV 8-67. AICWe ) 3 T=67 
MOV SNBRBUE RKGA CRE) 3L FER ADDRESS 
MOV SWRDATA, RKCS1(R2) ils WROATA 
MOV #68. #37. «1S SR oucH CLOCKS FOR 68 
1S: v MCL k RKMRICR2) ; NPR TRANSFERS 
v ‘ 1c(Re) 
DEC 
Ar 4° (Re) TATUS R 
Moy «sR BAERS} 7-882 :8TRRE ESRMEND AND STATUS REG. 2 
MOV RKWC (Re), T. ue :ST WORD COUNT REG. 
MOV RKBA(RE);T.BA 3ST BUS 8 ss 
mov RKER (RE) TAER 3ST REG. 
HOV sone coe it BAEC £3 
MOY —«SNPRBUF#<66.42>,2-B0 iL ECTED BUS ADDRESS 
CLR g-ER "LOAD ELPPR, Gabp Ree 
CMP °€S1,T.CS1 :CHECK CSI C CT 
BEQ 3 : YES, K 
OR 41 ?CS1° INC 
MOV #CCLR,RKCS1(R2) ;CLEAR RKB1I 
BR TSTi4 ?;GO TO NEXT TEST 
SS: CMP E.cS2,T.cS2 ;CHECK CS2 
BEQ 6$ ?NO, CHECK BUS ADDRESS 
ERROR 42 6 I T 
6S: CMP —.BA,T.BA ; CHECK RESS 
BEQ 7§ *YES, CHECK WORD COUNT 
ERROR 44 >BUS S INCORRECT 
7S: MP EWC, T.WC + CHECK COUNT 
EQ $ ;YES, CONT 
RROR 45 4) COUNT INCORRECT 
QS: MP E.ER,T.ER * CHECK REG CORRECT 
BEQ 10$ :YES, CONTINUE 
ERROR 43 *ERROR REG INCORRECT 
10S: MOV #NPRBUF , R3 ‘LOAD ADDRESS OR START OF BUFFER 


; ATEST 13 WRITE DATA NPR TRANSFE 

BREE eI res eejon Fated eh pe om 
i Pratk "DRIVE O. Lack N SEEK DRIVE CLEAR MESSAGES. 
;# GIVE CLOCK PULSE FOR 68 SILO WORDS. MAKE SURE DATA 
if CATE, Bes to OCCUR. READ BACK 66 WORDS AND VERIFY THEY 
4H ° 


SEQ oOss 


O46) O2-DEC-77 10:20 PAGE S6 SEQ OO0S& 


CZR6080 RK611 pats CTRL PRTY MACYI1 30(1 
ll Oe-DEC T13 WRITE DATA NPR TRANSFER 





CZR6D8.P -77 10:00 
? MOV #65. ,R1 sL COUNT FOR SICO 
2678 34 CLR neoCNT : INITIALIZE WORD COUNT 
287. 7740 MOV #IR!OR,E.CS2 :LOAD EXPECTED C 
2874 15S: MOV (R3)+ E08 *LOAD EXPECTED DATA 
2875 MOV RKDB(R2),T.08 ;GET DATA READ 
e876 MOV #20, RO :SET COUNT TO WAIT FOR SILO 
28 16S: DEC R :DEC COUNT 
2673 Boy 4s AKeS1(R2),T.CS1 ISTORE Cele 
MOV BK RES RS)’ T kee STORE re 
e881 1 MOV RKER (Re) t.ER  ;5T ERROR REG. 
100i MP E.cS1, ési ; CHECK Si CORRECT 
2883 O01 BEQ iE “ CONT INUE 
e884 O01 ERROR 46 3C 1 JNCORREC 
ess Ol MOV #CCLR,RKCSI(R2) ;CL RK611 
e886 1 BR TSTI4 :;GO ON TO NEXT TEST 
ee8e 10034 20S: CMP —E.cS2,T.cS2 ;CHECK CS2 CORRECT 
10042 BEQ 2is : YES, CON INUE 
10048 ERROR 47 :C INCORREC 
i Ol 21S: CMP E.ER,T-ER + CHECK REG CORRECT 
10054 BEQ 2s : CONTI 
3833 1005¢ ERROR s ERROR REG INCORRECT 
10056 228: CMP .08,T.08 CHECK AC CT 
e895 19066 1401 BEQ g ; CONT 
1 104051 ERROR S51 *DATA INC 
2897 910072 g0se37 003264 2ss: INC WROCNT : INCREMENT WORD COUNT 
S8eq ruta epteteed BNE 26S ;CHECK_IF LAST WORD 
2900 010102 012737 000100 003210 MOV #IR,E.CS2 : UPDATE EXPECTED cs2 
e901 010110 100316 26S: BPL 1S$ :CHECK IF FINISHED 
sap .SBTTL ##*HEADER RECOGNITION TESTS 
2930S g3 KREKKLKKKKRRKAEKEKRRRRSRLL ARERR RARER EAA RARER A RARER RRR RRL KKK EX 
e306 j ATEST 14 WRITE DATA HEADER RECOGNITION 
2908 1 CLEAR THE RK611 CONTROLLER WITH A CONTROLLER CLEAR. PUT 
2909 i CONTROLER IN MAINTENANC . ISSUE A WRITE DATA OF ONE 
2910 1 WORD TO AN RKOB IN 26 SECTOR FORMAT, CYLINDER O AD_O, 
2911 1% SECTOR 0. CLOCK IN BOTH SEEK AND DRIVE CLEAR MESSAGES. 
2912 1 SIMULATE A SECTOR PULSE AND A HEADER WITH THE FOLLOWING 
2913 + i DATA: 
e914 3% 
2915 1a ooo000 
2916 $i 140000 
e372 i 140000 
egi3 ;# MAKE SURE WRITE GATE SETS SHOWING CORRECT HEADER RECOGNITION. 
2921 ce KKKKERKKSERKRRREKKARKKRAARA KLARA SRRARERARRRARARARKKKARAAAARARKRHES 
29322 010112 op0004 +ST14: SCOPE 
2923 010114 012737 oo00012 o01200 MOV #10. ,STIMES ;;D0 10. ITERATIONS 
2924 010122 013702 001270 MOV SBASE , Re :LOAD RK611 BASE 
2925 010126 012762 100000 oop000 MOV #CCLR’{RKCS1(R2) :CLEAR RK611 
2926 010134 Ol2762 OO00040 oo00cE MOV #DMD,RKMR1(R2) :PUT RK611 IN DIAGNOSTIC MODE 





CZREDBO RK611 DSKLS . CTRL PRT4Y MACYI1 30(1046) O2-DEC-77 10:20 PAGE 57 SEQ 0057 
CZR608.P11 0:00 T1i4 WRITE DATA HEADER RECOGNITION 
2927 o1014 02 MOV 8-1, RKWC(R2) ;WORD COUNT=1 
2928 O101 oat v #BUFF RKBA(R2) :LOAD DUMMY ADORESS 
e3e9 9101 MOV eWROATA,RKCS1(R2)  ; ISSUE WRITE DATA 
233 10164 MOV #69. #442, RO ;1S ENO GH CLOCKS UNIT! READY 
101 1$ v #OMD! MCLK RKIRI (RE) 
1Bt3e Be oD peDoSe MOV #OMC , RKMRI CR, 
2934 O01 C RO 
ef i 1 1 900140 go0g26 MOV 13 aDIMSP RKMRI(R2) ;SIMULATE SECTOR PULSE 
i : i 3 bo3208 HOV . D ARKMAL (Re) ;STORE EXPECTED CS1 
2933 13882 piers erie cLR PR BIT Time ‘GENERATE SYNCH 
1 i MOV 5. ,RO 
eai3 1 7 7026 S$ JSR PC. ROBIT 
1 be 003140 MOV RKCS1(R2),T.CS1 
eS4s i 4 : 003140 cH Ec51,1.C51 NG, Ree CORRECT 
Saye 1 003262 INC BF Font i ARCRE BIT COUNT 
eaie i DEC RO : CHECK ment Se HCH FINISHED 
e320 i 4 003254 MOV 81,PR.8IT ;SIMULATE SYNCH BIT 
eee 10316 003140 MOV RKCS1(R2),T.CS1 
3 i 3140 CHE E.c51,1.C51 ; CHECK K CS1 CORRECT 
fi eee ng ARSE BED SO 
i 12$ HOV taabs as T BOER WORE 
S326 1 : MOV #16. ,RO PAD BT tts R WORD 
2960 O1 003256 15S: MOV PR.BIT,M1.BIT :STORE PREVIGUS BIT 
bes ot 364 ROR RS :GET NEXT BIT 
1 CLR PR.BIT 
E34 010374 BR 18$ 
010376 0127 000001 003254 173: MOV #1,PR.BIT 
See o1 7 037026 18S: JSR PC’ RDBIT ;SIMULATE NEXT BIT 
2968 010410 62 000000 003140 MOV RKCS1(R2),7.CS1 ;GET CS1 
6969 010416 37 7 003200 003140 CHP E.CS1,T.CS1 ING, REPGAT ERROR 
2971 01046 005237 003262 INC BITCNT {INCREMENT BIT COUNT 
5275 Olousd BOTse0 BRE OCS ee ae 
care Big Bora Be fils ee hatr pgp toe MITH Heo 
2976 01044 12 000105 MOV #69. ,RO SAD Count FOR GAP 
2977 O10446 013737 003254 oO03256 25s: MOV PR.BIT,M1.BIT iON ou GAP 
2978 O104S4Y 005037 003254 CLR PR.BIT 
2979 G1 0460 4737 037026 ISR PC, ROBIT 
2980 O10464 nia t4 DEC RO 
2981 O10466 001367 BNE 25S 
2982 010470 016237 oO00026 003164 MOV RKMR1(R2),T.MR1 ;GET MRI 


GOS 


CZR6DBO RK611 OSKLS CTRL PRTY MACY11 30(1046) O2-DEC-77 10:20 PAGE SB SEQ o0se 
CZ2R6DB.P11 G2-DEC-77 10:00 T14 WRITE DATA HEADER RECOGNITION 

2983 010476 012737 O62040 003224 MOV sori toh “ecuEg E.MR1 :LOAD EXPECTED MRI 
e384 10504 023737 003224 003164 CMP S CK IF WRITE GATE SET 

8S 010512 OO1411 BEQ +;YES, GO ON TO SExt TEST 
2986 10514 104053 ERROR 
$387 10516 000407 F2r15 ;;GO ON TO NEXT TEST 
2989 010520 016237 000010 003150 635: MOV RKCSe(Re) T.CS2 ;STORE CS2 FOR PRINT OUT 
2990 010526 016237 000014 003154 MOV RKER(R2),t.ER ;STORE ERROR REG FOR PRINT OUT 
633) 010534 104052 ERROR S2 :REPORT ERROR 
23393 : j Saaeesseunncensossestsetle Srtirtios GR IITE CATA 
e334 jkr T 15 SECTOR PULSE DETECTION FOR WRITE DATA 
2996 i CLEAR THE RK611 FarEnnce WITH A CONTROLLER CLEAR. PUT 
2997 © i CONTROLL ER in MA nOOE IS A WRITE DATA OF ONE 
2998 7 WOR : ome PO OE OARAT. YLINDER O, HEAD O, 
2999 ; ORO. oy CLOCK TN B ON Fou SEEK AND DAIVE CLEAR MESSAGES. 

00 x STMULAT SE AND A HEADER WITH THE FOLLOWING 
3001 1% DAT 
3005 + 900000 

;* 
3004 :% 140000 
3005 1 140000 
3006 3% 
3007 i MAKE SURE WRITE GATE DOES NOT SET. 
3003 MUTE TCT CT TTT TTT TT TT Tt tT tt tT TTT ttt ttt ttt ttt ttt itttttttiiititt? 
3010 010536 909004 éTis: SCOPE 
3011 O10540 012737 oo0012e o01200 MOV #10. ,STIMES ;;D0 10. ot TERATIONS 
3012 010546 013702 001270 MOV SBASE , Re :LOAD RK611 BASE 
3013 0105 1277 490000 oo00000 MOV #CCLR; RKCS1(R2) SET Sra Reet h 
3018 i 1 700 - nov ea STALL OUNT 
3016 10566 3 7 BNE 4S LOG ONT L_ZERO 
301 105 1 900040 o00026 MOV #OMD , RK (R2) RKELL IN DIAGNOSTIC MODE 
3018 010576 Ole 177777 oo0002 MOV #-1, RK 2) ; WORD COUN Ts 1 
3019 010604 167 055216 oo0004 MOV aBUFE hey LOAD _DUMM ¥ BUS AD ADDRESS 
3020 O106i2e 01027 000000 MOV CS1( Rais ISSUE WRI 
3021 010620 0127 000426 MOV see onra RO ; ISSUE ENOUGH clocks UNTILL READY 
3023 010624 0127 40 oo0026 1S: MOV #OMD! MCLK, RKMRI(R2) 
3024 eae eee peo04g 000026 MOV #DMD, RKMRI (Re) 
3025 10649 DEC RO 
ass i ag 1 one -SIMULATE INDEX PULSE 
3038 {Beco 1 pooead oo00026 MOV #80 RKMR1 (Re 
010656 O01 000640 000026 25: MOV #OMD'M MENDIRCLR RICHI CRE) 

3930 Oidere 000240 000026 MOV SOMO! MIND, -RKMRICR 
30 10674 1 BNE 2g 
3033 01 76 0 ooo0026 MOV #OMD RKMR1(R2) 
3034 010704 3254 CLR R.BIT ;GENERATE SYNCH 
3035 010710 37 3256 CLR ML BIT 
3036 010714 012700 000377 MOV #255. RO 
3037 010720 004737 037026 S$: JSR PC, RDBIT 
3038 010724 005300 DEC RO 
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SECTOR PULSE DETECTION FOR WRITE DATA 


BNE S$ 
MOV #1,PR.B81T ;SIMULATE SYNCH BIT 
JSR PC’ ROBIT 
V #HEAD1,R3 ;SIMULATE GOOD HEADER 
MOV #3 Ri 
12%: mov ( 3)+ A ;GET NEXT HEADER WORD 
1S$: nm Vv eR. BtT,M1.BIT SPRe® c Previous 81 Rp ' 
BCS 17S 
CLR PR.BIT 
BR 18$ 
17S: MOV #1,PR.8T 
188: ISR PC’ RDB ;SIMULATE NEXT BIT 
DEC RO ; CHECK IF READY FOR NEXT HEADER WORD 
BNE 1S$ CONT INUE 
DEC Ri CHECK JE, FINISHED WITH HEADER 
12S 
MOV #64 NBAB OC COUNT FOR GAP 
ess: MOV PR. att M1.BIT i SIMULATE GAP 
CLR PR.B 
ISR PC, BABIT 
DEC RO. 
BNE 
HM RMR} (Re) TNL e*REL "Cap CTDED MRI 
CMP mri, ES MRI Check oa wht rE GAFE bt DID D NOT SET 
BEG fen +;YES, GO ON TO NEXT TES 
OR 
5 a 
; ATES SECTOR INCREMENT 
iS CLEAR THE RK611 CONTROLLER, W WITH a, CONTROLLER CLEAR. PUT 
i CONTROLLER IN MAINTENANC A WRITE DATA OF ONE WORD 
1 3 seCTOR 0 ofl 6K. IN bth ao See SEEK BT, CY TE ENDER CLEAR HERP Shes. 
1 i SF CULATE: OPER HEADER, MAKE SURE 
i THAT WRITE GATE SETS, 
i REPEAT FOR SECTOR 1-24. 
4 + REKKKKLLEGEKREREG EGER RRR RRRRRRRRE ARERR EEEREERRRARAERRER 
+éT16: SCOPE 
MOV #10. ,STIMES ;DO 10. ITERATIONS 
MOV SBASE , Re fae 
CLR YLN NTT 1B YLINDER 
CLR SECTOR NITIAL TRACK AND SECTOR 
MOV #1$, $LPERR OA D LOOP ON ERROR LOCATION FOR 
:~ SUBTEST LOOP 
1$: 
JSR PC, INCHDR ;GENERATE HEADER _WORDS 
MOV #COLR, RKCS1(R2) ;CLEAR RK611 CONTROLLER 
MOV #OMD,RKMR1(R2) ;PUT RK611 IN DIAGNOSTIC MODE 


O46) O2-DEC-77 10:20 PAGE 60 SES O00 


CZR6DB0 RK611 OSKLS CTRL PRTY MACYI1 30(1 
C-77 10: T1i6 SECTOR INCREMENT 





CZR6DB8.P11 - 0:00 
003 MOV CYLN,RKDCYL(R2) ;LOAD DESIRED CYLINDER 
ge pit iee bo3a7e raat MOV SECTOR, RKDA(Re) ;LOAD DESIRED TRACK/SECTOR 
3097 11164 002 MOV 8-1, RKWC (Re) :WORD COUNT=1 
30 11 Sel 004 MOV #BUFF . RKBACR2) i HOAD DUMMY ADDRESS 
ll MOV sWROATA,RKCS1(R2)  ;.ISSUE WRITE DATA 
190 il 26 MOV #69. #442, RO ;ISSUE ENOUGH CLOCKS UNTIL READY 
1 : FOR SECTOR PULSE 
31 11 gooug S$: MOV #OMD! MCLK, RKMR1(R2) 
1 11 000026 MOV #0MD, RKMRI (R2) 
cat me | 8 
3108 il 140 000026 MOV SOND! MSP RKMRI(R2) ;SIMULATE SECTOR PULSE 
31 11 0 o00026 MOV #OMD, RKMR1(R2) 
3108 11 3254 CLR PR.BIT ;GENERATE SYNCH 
1 11 3256 CLR M1.BIT 
3110 O11 MOV #255. RO 
3111 O11 037026 10$: JSR PC, RDBIT 
3115 Olt BNE «AS 
gita 11566 69708 003254 HOV 81,PR.8 T ;SIMULATE SYNCH BIT 
3116 it 4 00330¢ mov #HEADER, R3 ;SIMULATE HEADER 
3118 11318 12S: MOV (R3)4+,R4 ;GET NEXT HEADER WORD 
3119 1131 oo0020 MOV #16. ‘LOAD BITS PER WORD 
3120 O11 003254 003256 15S: MOV PR. BIT, M1.BIT 
a BH cs 
aie Slike ooaes4 ck Peart 
125 
3126 11348 000001 003254 17%: MOV #1,PR.BIT 
31e 11 7 19S: ISR PC’ RDBIT ;SIMULATE NEXT BIT 
3128 11368 sathama DEC RO :CHECK IF READY FOR NEXT HEADER WORD 
3129 O11 BNE 15S *NO, CONTINUE 
3130 O11 DEC R1 :CHECK IF FINISHED WITH HEADER 
3131 O11 BNE *NO, CONTINUE 
3132 011364 000100 MOV #64. RO :LOAD COUNT FOR GAP 
3133 0113 003254 003256 255: MOV PR.BIT,M1.BIT SIMULATE GAP 
3134 011376 003254 CLR PR.BIT 
3135 011402 037026 JSR PC, RDBIT 
3136 611406 DEC RO ;CHECK IF GAP FINISHED 
13 1141 ess ?NO, CONTINUE 
3136 o11420 Bopses onsiee mov = BKDACR) ,T-DA 5 GET DISK ADDRESS FEC. 
3140 Ot tase 003206 3146 CMP ,T.0A sCHECK DISK ADD CORRECT 
3141 011434 40 BEQ OS :¥i CONTINUE 
3i4e 011436 40 4 ERROR 54 ;DI ADDRESS INCORRECT 
14 1144 003220 003160 30S: CMP E.DCYL,T.DCYL CHECK IF CYLINDER ADD CORRECT 
3144 011446 40 BEQ 32$ :YES, CHECK IF LOOP ON ERROR 
3145 O114S0 104 ERROR Re :CYLINDER INCORRE 
3146 01145¢ 104418 32S: SCOP 1 :CHECK IF LOOP ON ERROR 
3147 011454 105237 003276 INCB SECTOR : INCREMENT SECTOR 
. ; 
3148 O11460 122737 O00026 003276 CMPB #26, SECTOR CHECK IF ALL SECTOR TRIED 
3149 011466 001220 BNE 1$ :NO, TRY NEXT VALUE 
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TRACK INCREMENT 
0G ai SE Se a aE SE eS HE a EH a SS a a 
ST 17 TRACK INCREMENT 


CLEAR ie RK611 CONTROLLER WITH A_ CONTROLLER 
CONTROLLER IN MAINTENANCE MODE. ISSUE A WRIT 
TO AN RKOEG IN 26 SECTOR CYL 

SECTOR g>; ot K IN BOTH SEEK AND DRIVE CLE 
SIMULATE SEC PULSE AND PR 

THAT WRITE GATE SETS. 


: REPEAT FOR TRACK = 1. 


AEETTTTTETTTTTETETETTTTTTETETTTTTTTTT ETT TTT TTT TEES TTT TTT TTT rrr Tt 
t$T17: SCOPE 


niente * 


MOV #10. ,STIMES ;;DO0 10. ITERATIONS 
MOV Sanst Re : LOAD Rett BASE 
CLR CYLN j INITIALIZE CYLINDER 
MOV #25, SECTOR : INITIAL TRACK AND SECTOR 
MOV #15, SLPERR :LOAD LOOP ON ERROR LOCATION FOR 
: SUBTEST C bob 
1S: 
JSR PC, INCHDR ;GENERATE HEADER S 
MOV #CCLR, RKCS1(R2) ;CLEAR RK611 CONTROLLER 
MOV JRKMRICR2) ;PUT RK i IN DIAGNOSTIC MODE 
MOV CYLN:RKDCYL(R2) ;LOAD RED CYLINDER 
mov S CTOR RKDA CRE) iL DESIRED TRACK/SECTOR 
MOV #BUFF RKBACR2) Lb SUNNY AODRESS 
MOV #WROATA,RKCS1(R23  ;ISSUE WRITE DATA 
MOV #69. #442, RO ; ISSUE ENOUGH CLOCKS UNTIL READY 
S$: MOV #OMD!MCLK, RKMR1(R2) 
MOV #DMD, RKMRI (Re) 
DEC RO 
BNE 5S 
Mov BOND! MSP RKMBL (RE) ;SIMULATE SECTOR PULSE 
LR pe. BtT ;GENERATE SYNCH 
MOV #255. RO 
10S: JSR PC, RDBIT 
DEC RO 
BNE 10S 
Mov 81,PR.B1T ;SIMULATE SYNCH BIT 
MOV He : ; SIMULATE HEADER 
12$: MOV (R3)+,R4 ;GET NEXT HEADER WORD 
Iss: MOV ala a ee 
’ ROR "pte 
BCS 17S 
CLR PR.BIT 
BR 18$ 


SEQ 0061 
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(1046) O2-DEC-77 10:20 PAGE 62 
Ti? TRACK INCREMENT 
17$: MOV #1,PR.BIT 
18S: JSR PC; RDBIT ;SIMULATE NEXT 
DEC 0 :CHECK IF READY FOR NEXT HEADER WORD 
BNE iss ?NO, CONTINUE 
DEC 1 :CHECK IF FINISHED WITH HEADER 
BNE 12$ ;NO CONTINUE 
MOV #64. RO *LOAD COUNT FOR GAP 
2ss: MOV PR.BIT,M1.BIT ;SIMULATE GAP 
oR pe ROB 
PC, RDBIT 
DEC RO ;CHECK IF GAP FINISHED 
AY cde it § 
MOV KDA(R2),T.DA  :Get OISk SS REG 
MOV RKDCYL(R2),T.OCYL ;GET CYLINDER ADD REG. 
E.DA,T.DA sCHECK DI CORRECT 
BEQ 3 YE 
ERROR Be ;O1SK ADDRESS INCORRECT 
30S: CMP -OCYL,T.DCYL }CHECK VEINDER ADD CORRECT 
BEQ 32S :YES CHECK F hoor ON ERROR 
ERROR Re 3CYLINDER INC CT 
32S: SCOP1 *CHECK IF LOOP ON ERROR 
INCE TRACK i 
CM #3, TRACK *CHECK IF ALL TRACKS TRIED 
BNE 1$ ?NO, TRY NEXT VALUE 
5p ERK E RARER EARLE ERLE REEL EE RAE RE RARE REREREEEREERREREEE EERE EEE 
j ATEST 20 CYLINDER INCREMENT 
1 i CLEAR THE RK611 CONTROLLER WITH A CONTROLLER CLEAR. PUT 
: a CONTROLLER IN MAINTENANCE MODE. ISSUE A WRITE DATA OF ONE WORD 
1 i TO AN RKO& IN es SECTOR ORMAT, CYLINDER 0, HEAD 2 
i SECTOR 25. cL K IN BOTH SEEK'AND DRIVE CLEAR MESSAGES. 
1 i SIMULATE SECTOR PULSE AND PROPER HEADER, MAKE SURE 
i THAT WRITE GATE SETS. 
is REPEAT FOR CYLINDER = 1-632. 
MPTTC TTT TT TTT TTT TTT TTT Tt tt TT ttt TT ttt tt ttt tit tt tttttttititttitit 
$720: SCOPE 
MOV #10. ,.STIMES ;;D0 10. ITERATIONS 
MOV $BASE, Re :LOAD RK611 BA 
CLR : INITIALIZE CYLINDER 
MOV #1025, SECTOR : INITIALIZE TRACK AND SECTOR 
MOV #1$, SLPERR ;LOAD LOOP ON ERROR LOCATION FOR 
: SUBTEST LOOP 
1S: 
JSR PC, INCHDR ;GENERATE HEADER WORDS 
MOV #CCLR, RKCS1(R2) CLEAR RK611 CONTROLLER 
MOV #OMD,RKMRI(R2) ; RK611 IN DIAGNOSTIC MODE 
MOV CYLN’ RK cr (Re) L DESTRED CYL INDE 
MOV SECTOR, RKDA(Re) 3L SIRED TRACK/SECTOR 
MOV #-1, RKWC (Re) :WORD COUNT=1 
MOV #BUFF RKBACRE) ‘LOAD DUMMY ADDRESS 
MOV #WRDATA,RKCS1(R2)  ;ISSUE WRITE DATA 
MOV #69. #442, RO ; ISSUE ENOUGH CLOCKS UNTIL READY 


SEG 0062 


CZR60B0 RK611 DOSKLS CTRL PRTY 
0e-DEC-77 
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0032S4 
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S FO 
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30( 1046) 
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SS: 


10S: 


12$: 
158: 


17S: 
18S: 


ess: 


30$: 


32S: 


tite 
s 
:% 
1% 
:% 


T 2l 


O2-DEC-77 10:20 
CYLINDER INCREMENT 


PAGE 63 


FOR SECTOR PULSE 


MOV #OMD! MCLK KMRL (Re) 
bee porn R2) 
5 
MOV SOND! MSP RKMRI 1(R2) ;SIMULATE SECTOR PULSE 
cLR eR at ;GENERATE SYNCH 
Sv #2se RO 
J PC, ROBIT 
fe 
HOV BRoeiT ;SIMULATE SYNCH BIT 
aee GHEEDE »R3 ;SIMULATE HEADER 
HOV f2 sys RY R W 
MOV He RO i PAO STIs PE RE To 
MOV -BIT,M1.BIT 
OR RY 
BCS 17S 
cL PR.BIT 
18$ 
eR pe’ RDaTT SIMULATE NEXT 
DEC RO. i HECK if READY BOR NEXT HEADER WORD 
15S ?NO, CONTINUE 
DEC Ri *CHECK IF FINISHED WITH HEADER 
BNE 125 ?NO, CONTINUE 
MOV #64. *LOAD COUNT FOR GAP 
MOV PR. tT, mi BIT ;SIMULATE GAP 
cer Pe’ ROBIT 
DEC BBs ;CHECK IF GAP FINISHED 
BNE :NO, CONTINUE 
Roy BEBRCTERAT-PPoovd toe oet TREN oO Rec 
CMP EKDC I pene), “oHe eK DISK RDB CORREC 
PEROR 308 PreK ADDRESS I t 
ERB E-QCYL,T.DCvL Bh eP EYCINDER aad CORRECT 
BEQ 3es YE CHECK LOOP ON ERROR 
SCOP1 aM; Kae L ON ERROR 
INC CYLN ? INC NT CYLINDER 
MP #633, CYLN >CHECK IF CYLINDER TRIED 
?NO, TRY NEX UE 


CONTROLLER IN MAINTENA 


Lsequeseenasaescssesesesepes sede reogeTenneaennnnanaceeueaneese 
BAD SECTOR ERROR (PART 1) 


CLEAR THE RK611 ConTneL Len WITH A CONTR. CLEAR. 
NCE MODE. ISSUE _A 


PUT 
WRITE DATA OF 


ONE WORD TO AN RKO& IN 26 SECTOR FORMAT, CYLINDER O, 


SEQ 0063 


Cc 


SBRURTERP EAD UMUMRORGaCas tees gata ERSR UNO 


QOOOO000N BOOCOOCOCOOOOCO0O0O000000000 


ne ee a eb bb Fp 


i weal Tees OSKLS CTRL an 


atatatay 


NNNN 
fwre 


hh bb 0 


02-DEC-77 10 


12 000100 
003254 


MACY11 30( 1046) 





003256 


0032S4 


003256 


Se eeee Se ee eeee ee Ge Gewese + 
* MOK OK OR Mok 6D 
-— 


1S: 


12S: 
15S: 


17S: 
18S: 


ess: 


O2-DEC-77 10:20 PAGE 64 


SECTOR ERROR (PART 1) 


Rescades.© StruLATe A SECTOR PULSE ANO'A HEADER KIT 


TENE PE RPP ERP ER ERROR SETS. 


ee ee rere eee 


+éT21 


HE FOLLOWING 





CHECK THAN DISK ADDRESS 


sdnses sipes ; 7 BR Rk, {repeat ONS 
SSRDNARNRT LASS BATT tn oracnosric noo 


50° *RADCYL (Red sh APE END SECTOR 
Wat RB =1 


tg DUMMY BUS AD ADDRESS 
seo suse A Kg‘ 1sBUE enous Ei BeKs UNTIL READY 


OR SECTOR PULSE 
$8r8, Re IMCL K, mam chey 


'MSP,RKMRI(R2) ;SIMULATE SECTOR PULSE 
r RKMR1 (Re) 
-BtT ;GENERATE SYNCH 
M1. v0 
DBI 
5 ;CHECK IF SYNCH FINISHED 
Hi,PR.BIT ;SIMULATE SYNCH BIT 
PC’ RDB 
aHEADE, R3 ;SIMULATE HEADER ERROR 
(R3)4+,R4 ;GET NEXT HEADER WORD 
$16, 80 BIT /LOAD BITS PER Ss wor 
RS . 2 3ef NEXT gif 
PR.BIT 
18$ 
#1,PR.B1T 
PC’ RDBIT ;SIMULATE NEXT SIT 
RO’ ‘CHECK IF READY FOR NEXT HEADER WORD 
15S :NO, CONTIN 
1 CHECK TF IF FINISHED WITH HEAD2 


Cc 
+LOAD BUA OR GAP 


. RO 
PRoBtToM1.BIT :SIMULATE GAP 


SEQ 0064 


nn A 


Cc RK611 OSKLS CTRL PRTY MACYI1 30(104%6) O2-DEC-77 10:20 PAGE 6S oos 
Sat een 10:00 Tel BAD SECTOR ERROR (PART 1) = . 
75 O01 003254 CLR PR. BIT 
1 §97526 JSR PC, ROBIT 
1 DEC ;CHECK IF _GAP FINISHED 
1 BNE s : CONTINUE 
1 i 003140 MOV $1 (R2),1.CS1 ?GEt CS1 
ie ot i] Besley REY RRERTASy tren GET Eaton 
1 1 pos 80 MOV Bara Q€.cSi 3k RECTED cS1 
1 1 003210 MOV #IR!OR,E.CS2 ;LOAD CTED cSe 
1301 7 003214 MOV wi LORD CTED ERROR REG. 
1 7 003140 CMP .cS1,T.CS1 i CHE CS1 CORRECT 
386 1 14 BEQ YE : CHEEK cse 
1 04 ERROR 6 3CS1° INCORREC 
1 3737 003210 003150 30S: MP cs2,T.cs2 :CHECK CS2e C T 
3 1 1401 ;YES, K RROR REG. 
3 1 104064 ROR 4 *CSe2’ INC T 
3 1304 3737 003214 003154 32S: CMP EER T.ER : ck RROR REG CORRECT 
3 1 1401 BEQ 2 2e 33 ON TO NEXT TEST 
33 13052 104065 RROR *ERROR REG INCORRECT 
3395 ; «PEGE LE EGER GEER RARER EGR EERE A RRRRRRRE REE EES 
3 36 i ATEST ee BAD SECTOR ERROR (PART 2) 
3398 ta CLEAR THE RK611 CONTROLLER WITH A CONTROLLER CLEAR. PUT 
3399 ti CONTROLLER IN MAINTENANCE UE A WRITE DATA OF 
3400 : ONE WORD TO AN RKO& IN 26 SECTOR T, CYLINDER O 
3401 + HEAD 0, SECTOR 0. CLOCK IN BOTH SEEK AND DRIVE CLEAR 
3402 + MESSAGES. SIMULATE A SECTOR PULSE AND A HEADER WITH 
3403 $i THE FOLLOWING DATA: 
340s H on9a00 
;# 
3406 ;% 100000 
3307 * 100000 
3% 
409 1 i MAKE SURE BAD SECTOR ERROR SETS. CHECK THAT DISK ADDRESS 
16 is IS NOT INCREMENTED. 
aiis » ORE BE HERE HB HEHEHEHEHHE HEHEHE HHH HE RHE HEHE BHBHBHBHEHHBE 
3413 013054 oo00004 sapere SCOPE 
3413 013056 12737 12 001200 MOV #10. STIMES ;;D0 10. _TTERATIONS 
1S 013064 013702 270 MOV SE, Re ;LOAD RK611 BASE 
3416 0130 12762 oo0000 MOV #CCLR;{RKCS1(R2) ;CLEAR ARG LI 
3417 13076 127 MOV so. RKDCTE 1(R2) ;PUT RK& bil I IN DIAGNOSTIC MODE 
318 13104 O1 MOV (Re) ;LOAD ¢ 
341 13li2 O1 6 MOV ) AND SECTOR 
3420 013120 Ole 1 oo00002 MOV Hs RWC 2) ‘ORD SRD COUNT as 
3421 013126 Ole 16 000004 MOV sBUFF RKBA(R2) 4m purity BUS ADDRESS 
36 o1 134 18? 000000 MOV #WROAT CSi(R2})  ;ISSUE WRITE DATA 
34 13142 O1 26 MOV #69. aye RO ; TSOUE ENOUGH CLOCKS UNTIL READY 
3u5e 013146 012762 000440 oo002z6 1S: MOV #OMD! MCLK RKMRL (RE) 
3457 Olsiee possog ONO S0ne. roy gre, cml (Rk 
3428 013164 1370 BNE 1$ 
3429 013166 ee 000140 oo00026 MOV tOMD! MSP RKMR1(R2) ;SIMULATE SECTOR PULSE 
3430 013174 O12762 OO0040 o00026 MOV #DMD, RKMR1 (Re) 


cEnepego, ves DSKLS CTRL PRTY 
CZR608 .P Oe-DEC-77 10:00 
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Pateuiscse ear cuiscats is 32435: 
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ess: 
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32S: 


NC Ce 


O2-DEC-77 10:20 PAGE 66 

BAD SECTOR ERROR (PART 2) 
PR.BIT ;GENERATE SYNCH 
Mie IT 


;CHECK IF SYNCH FINISHED 


B33 
& 
“3 


eee eh LT a 


#1,ER.GIT ;SIMULATE SYNCH BIT 
PC’ RDBI 
#HEROS, R3 ;SIMULATE HEADER ERROR 
(R3)4+,R4 ;GET NEXT HEADER WORD 
#16. ,RO :LOAD BITS PER WORD 
MOV PR.BIT,M1.8IT STORE PREVI BIT 
ROR RY :GET NEXT BI 
BCS izs 
CLR .BIT 
BR 18S 
MOV #1,PR.8IT 
JSR PC’ RDBIT ; SIMULATE NEXT BIT 
DEC 0 :CHECK IF READY FOR NEXT HEADER WORD 
BNE 15S :NO, CONTINUE 
DEC I. ?CHECK IF FINISHED WITH HEADS 
BNE 1 ?NO, CONTINUE 
MOV #64. RO :LOAD COUNT FOR GAP 
MOV PR.BIT,M1.BIT +E PMULATE GAP 
CLR PR.BIT 
ISR 9 
DEC RO ;CHECK IF GAP FINISHED 
NE eet :NO, CONTINUE 
MOV $1(R2),7.CS1 i Get CS1 
roy RLGRTaSS> Ten" (SET Ean 
MOV RLRDATA e651 iC Gap cteD cS 
MOV #IR!OR,E.C L XPECTED C52 
MOV #8SE,.E-ER ; LORD XPECTED ERROR REG 
CMP —E.cS1,T.cs1 ; Ck cSt Cc CT 
BEQ 30$ iE ‘ K 2 
ERROR 63 3CS1’ INCORRE 
CMP E.cS2,T.CS2 :CHECK CSc C CT 
BEQ 32S YES, CHECK ERROR REG. 
ERROR 64 3CS2" INC CT 
CMP EER T.ER 5 CH ck ERROR REG CORRECT 
BEQ TST23 ; GOON TO NEXT TEST 
ERROR 65 ERROR G INCORRECT 
SEEGERS RREAL RRR RARRRRRRRRRRRERARRE REAR RRRRRRRERRARRRAKKKEES 
EST 23 OPERATION INCOMPLETE 
CLEAR RK611 CONT ER Fendt Hobe A CONTROLLER CLEAR. T 
CONTROLLER gty MAIN Bt ISSUE A WRITE DATA OF 
WORD T cee PRC go FORMAT CYLINDER 1253, 
HEAD 2 SERTOR ea N BOTH SEEK AND DRIVE CLEAR 
MESSAGES. S CK TOR ULSE AND 32 SECTORS WITH 
1 BIT DIFFERENT IN 30 Bits OF OPI DETERMININATION. ALL 
SIMULATED HEADERS, HAVE GOOD HEADER VRC. MAKE SURE ONLY 


CZR6DB0 RK611 DSKLS CTRL PRTY MACYII 30(104%6) O2-DEC-77 10:20 PAGE 67 SEQ 0067 
CZR60B.Pi1 02-DEC-77 10:00 T23 OPERATION INCOMPLETE 
87 ;* OPERATION INCOMPLETE AND CONTROLLER ARE THE ONLY ERRORS 
# THAT SET. 
es KKKAKRSRKSSSRASRASAAARAKKASAAARARAARRASRERRERAERRRAERARRERREKHRES 
i ol t$T23: SCOPE 
3¢ i 1 2 001200 MOV #10. .STIMES Bi} fT gAaEo"S 
ga i 4 i ooo0000 Hoy - CL Recs cre) ; :08 
elt cou 

95 Ol MOV #2500, RO "is COUNT FOR STALL 

9% 13476 2s: DEC he COUNT * 
i ENG RKMRI (RE) j RK611 I AGNOSTIC MODE 
1351 1 MOV RK ) BUFFER ADDRESS 
Hels Gleree bor RE TREES nos MRO inh 

3500 1 1 1533 vale MOV * RK. RS) ibap° Ingen SECTOR 
i 1 10023 o00000 MOV ER cdl ae, ISSUE WRITE DATA 
3204 1 012700 26 MOV #69. #442, RO 1S Enouce gto S UNTIL READY 

1 1 goowsa oooo26 1S: MOV 'MCLK peop ie 
i 000026 v ,RKMRI (Re) 
et ISS 
i sOrA AT cent. e. cit 


eer 
e 
8 
83s oO 
- 
ae 
z 


NOUS Wl 2: 


bh bP bh 


TUWAU MRR TWO 


he Ce eee ra, cit Caen a 


oooo26 «SS: Sov TONS MSP ae Nit SiRUCATE SECTOR PUL SE 





Bf 
Bt se 
Bt anita 693318 Cop . + RAMI (RE) CK AL RS_DONE 
61 So 823°» SHE = Nat oT ERRER ree 
3521 i cLR PR BIT : RATE SYNCH 
sf #8 Roy Beka 
10S: JSR ,ROBI 
i DEC RO. ;CHECK IF SYNCH FINISHED 
3258 1 000001 003254 MOV #1,PR.BIT ;SIMULATE SYNCH BIT 
3528 013712 JSR PC’ RDOBIT 
1 MOV "3 Ri MULATE 
1 12$ MOV (R3)+,R4 
1 0137 20 MOV #16. RO x PEADE WORD 
3532 0137 003256 15S: MOV PR.BIT,M1.BIT LOA RE PREVIOUS 8 
1 ROR RY :GET NEXT 
1 BC 7S 
1374 CL R.BIT 
3538 13746 BR 18$ 
1 003254 17%: MOV #1,PR.BIT 
3238 61 33P tae: JSR Ba’ Phatt ;SIMULATE NEXT BIT 
3 40 0137 EC RO ; CHECK IF READY FOR NEXT HEADER WORD 
41 013764 1361 NE 15s CONTINUE 
3542 013766 005301 DEC Ri CHECK IF FINISHED WITH HEADER 


CZR6DB0 RK611 OSKLS CTRL PRTY MACYI1 30(1046) O2-DEC-77 10:20 PAGE 68 SEQ 0068 
CZR60B8.P11 O02-DEC-77 10:00 Te3 OPERATION INCOMPLETE 
ON NYE 
iT Bab ROUN FOR GAP 


343 19772 BY2780 00100 Rov (a 
354S 003254 : 


. RO 
PR.BIT,M1.BIT ;SIMULATE GAP 


;CHECK IF GAP IS FINISHED 


Tah 
BVT 
2000 
=i 

: 
Rie 





6 AE eS a a a SE A a A a a a a a a a a a a a a aaa 
HEADER VRC 


en TOs arty fo ITE DATA vor 
ITH Cot T IN 24 CYLINDER a 


Bees tite aah, sage RWITH BIT O 


Sib Be ERRERPSRE no Ghc ERAGE RPE PBs 


li 


236 oo0004 pansee 
240 012737 o00012 001200 #10. ,STIMES ;;D00 10. ITERATIONS 


CLEAR RKGAL A RRINTERANC RANGE RODE Aa conte eras CLEAR. 


geet GINGOS BICESe oppone goatun acs Rctsucnas.t-csy iat fr 
eM 
ae SP ee 
352 {abe 7 003210 003150 30S oo “ar She rhe 
3555 BI iBee 23 03214 003154 31S CHP E.ER,T.ER Sreck"e CheG CORRECT 
; G INCORRECT 
es 38 _ oy Psi | ; CHECK TO MAKE SURE WRITE GATE DID NOT SET 
mee Rls wis: HR cur LER Doce cout 
3260 Bi4iae SNe Sag TMORCNT On GubeK TP FINGHED 
3596 fie BYE H ie .c8t $LROB.GRBOR. BIT og END OF OP CONTENTS 
3071 ii S ¥ICERR,E.CS1 
s ae 35S: BEG Bs es x "ee 
75 O141 37S: MoV SCCLR,RKCS1(R2) ; Fit CORTRO OLLER 
3576 0141 MOV RKCSIt(R2),T.CS1 Pak 
355, plete ney ecgesSe) Tess | Gee 
3 6 HOY ps ppedt-€ ; cT 
seee Ghiecs ce ERayrectd Bok Tee Cbmaeel 
a 014234 ERROR 153 
3586 
3587 
3268 
30 
91 


HN em 
m 


oe Sees Sees ee es es es eres 


itatatate 
RPG 


WW) 
uw 
por 
No 
oo 
pares 
Ps 


CZR60B80 RK611 OSKL Al pap MACY11 30(1046) O2-DEC-77 10:20 PAGE 69 SES 0069 
CZR608.P11 Oe a HEADER VRC 


14 1 MOV SBASE | bee RK& 1 BASE 

14 1 i 993200 MOV acentt TEUROATA, amie CTED CS1 

14 1 00321 MOV #IR?OR Ces 

14 i 14 MOV svvac eR ig TED ERROR REGISTER 

14 1 1170 MOV #1,$7 ; = fe ae FOR VRC ERR 

14 12737 T4310 1110 MOV #1$,$LPERR 3L ON ERROR LOCATION FOR 
: oebe EST LOOP 


@CCLR,RKCS1(R2) ;CLEAR RK61 
82000, RO ;SET COUNT FOR STALL 


Lo 
MOV sho, BKMRI (RE) CSG ON AMOI IN MAINTENANCE MODE 
VRCHDR+4 VRC 
BIT 840270, vr 4 : MAKE ONE BIT BAD 


be he be ee 
fwre 


& 


Sok BRASP Ness RIPoKs 
x Ry 
as 
8 





ret aS SELLS LLLCLCLS 


70 +4 
ett MO SBUFF;RKBA(R2) ;L DUMMY ADDRESS 
MOV 8-1, RKWC(R2) : COUNT = 1 
1 MOV #1023,RKDA(R2) LOAD TRACK 2 SECTOR 23 
MOV 5 RKDCYL (RB) gLOAD CYLI R 1253 
MOV 'corT! A, RKCSI ¢ ); COMMAND 
MOV #69. #442 ORD COUNT’ UNTIL READY FOR SECTOR 


a 
is 
8 





atta atta at atatat at 
SRRARAERAR TTA HT DONO 


ee 0 bb he be eh hh bb bh he ee 


DEC 
BNE 
44 goog26 MOV 'MSP,RKMRI(R2) ;SIMULATE SECTOR PULSE 
6 MOV 8 RKMAL (Re) 
Wig6 4 CLR PR. BIT ; INITIAL BITS 
a4 7 nov ae BIT Ao SIMULATE SYNCH 
B39 1S$: JSR Be ROD IT : 
1 BNE iss 
909091 003254 HOV a »PR.BIT ;GENERATE SY SYNCH BIT 
1 p22 958 MOV AVRERBR. RS SP OAD” Boprece. of HEADER 
12701 000003 MOV #3,R1 ;LOAD HEADER COUNT 
3b4 1 17S: MOV (R3)+,R4 Ger XT HEADER WORD 
4 1 000020 MOV #16. ,RO L ITS PE WORD 

3e44 4805 13737 003254 003256 20S: mov PR-BET,m1.8I7 ‘SIMULATE NEXT BIT 
S35 Se ES cones Be Biferr 
268 poe483 BR 25s 
36 4 2737 000001 003254 23S: MOV #1,PR.BIT 
Set B Ge55 pies 7 037026 25s: JSR PC’ ROBIT 
365¢ ° 4574 5300 DEC RO ;CHECK IF FINISHED WITH WORD 
365 4576 1361 BNE 20S :NO, CONTIN 
3654 014600 005301 DEC Ri :CHECK IF HEADER FINISHED 





CZR6DB0 RK611 RL PRTY MACYLI 30(1046) O2-DEC-77 10:20 PAGE 70 SEQ 0070 
Pll -77 10:00 T24 HEADER VRC 
1 BNE 17S ;NO, CONTINUE 
taeod 900109 MOV #64. RO :SIMULATE GAP 
1461 3254 003256 30S: MOV PR. GIT, M1.B1T 
1 O03654 CLR PR. BIT 
1 ISR PC, ROBIT 
i BRE 
1 003140 MOV RKCS1(R2),T.CS1 ;STORE CS1 
B90918 S310 Roy uCBe(Re),TZCSe STORE CEE 
ive 4 eerie postae cne be OF esi i CHECK f 1 CORRECT 
ieee ERROR 1 + CEP’ rhe & 
14666 003210 003150 35S: CMP .cS2,T.cS2 :CHECK CS2 CORRECT 
146 Q 7§ YES, K ERROR REG 
14676 2 +CS2’ INC T 
14 003214 003154 37S: CMP E.ER,T.ER :CHECK ERROR REG CORRECT 
14 4 : cK IF KOOP ON ERROR 
1471 OR 7 iE INC T 
14712 40S: SCOP1 : HE I Lo ON ERROR 
147e0 —" Bes ood 1 EET FINTCHED 
014722 014310 IMP 15 :M0, CONTI 


55 Hee AE EAE AE aE A HE 0 a a a a a a a a a a a a aaa 
EST 2S BAD SE RROR AND HEADER VRC 


grbrerrreriaranriararriatarrertats 
SAE ORR a abate é 


:&T 
; & 
;# CLEAR RK611 CONTROLLER WITH A CONTROLLER CLEAR. PUT 
1a CONTROLLER IN MAINTENANC . ISSUE A WRITE DATA OF 
1 ONE 0 AN RKO& IN 26 SECTOR FORMAT, CYLINDER 300. 
: HEAD 1, SECTOR 17 cLOck IN BOTH SEEK AND DRIVE CLEAR 
i MESSAGES. SIMULATE THE FOLLOWING HEADER: 

3688 * i 000 

3689 + i 0400S 

3e¢1 H igi 
-% 
v 

363¢ i MAKE SURE ONLY HEADER VRC ERROR SETS. 

sad ee REKKRERKRKKRAKLRKASEAAARARAREKRARARRARRRAKRRRRARKRRARARA RRA HRA KES 

95 014726 oD00004 tST2S5: SCOPE 

3696 014730 012737 o00012 001200 MOV #10. STINES ;;00 10. ITERATIONS 

3697 014738 0137 127 MOV $ : ; LOAD RK611 BASE 

3698 01474 127 i oo00000 MOV #CCLR.RKCSI(R2) ; LEAR RK611 

3699 014750 bie? 000026 MOV #OMO,RKMRI(RE) ; RK611 IN DIAGNOSTIC MODE 

3700 014756 012762 000020 MOV #300; RKDCYL(R2) °;LOAD CYLINDER 

3701 014764 167b¢ 1? 000006 MOV #417°RKDA(RE) =; L TRACK AND SECTOR 

3702 O14 127 000002 MOV #-1, RKWC (Re) :WORD COUNT=1 

3703 Ol 1676¢ 5216 000004 MOV #BUFF.RKBA(R2) ;LOAD DUMMY BUS ADDRESS 

37 15006 0127 000000 MOV #WRDATA,RKCS1(R2) ;ISSUE WRITE DATA 

3708 15014 012700 oo04e6 MOV #69. #4+2, RO j ISSUE ENOUGH CLOCKS UNTIL READY 

3707 O15020 012762 OO0440 oD00e6 1S: MOV #OMD! MCLK, RKMR1(R2) 

3708 015026 Ole762 OO0040 o00026 MOV #OMD, RKMRI (Re) 

3703 015034 005300 DEC RO 

3710 015036 001370 BNE 1$ 


GO6 


CZR6DBO RK611 OSKLS CTRL PRTY MACY11 30(1046) O2-DEC-77 10:20 PAGE 71 SEQ 0071 
CZR6D8.P11 02-DEC-77 10:00 Tes BAD SECTOR ERROR AND HEADER VRC 

371 1 1 MOV 'MSP,RKMRI(R2) ;SIMULATE SECTOR PULSE 

at p s04e ogo BBonse MOV RKMR1 (Re) 

318 Olsbes : ck Ppt {GENERATE SYNCH 

Bit flees Bare Bice ORs 

716 O1 7 SS: ISR ,ROBI 

at Bib. E R ;CHECK IF SYNCH FINISHED 

718 151 12737 000001 003254 MOV 81,PR.BIT ;SIMULATE SYNCH BIT 
Hel BIST Biers Besscg Roy HEADS, Ra SIMULATE HEADER ERROR 
3554 pielsa Bi 900020 a ie ch3)+ a TOMEI TS PER LORD 
3768 18130 003254 003256 15S: MOV PR.BIT,M1.8IT STORE PREVIOUS BIT 
3559 piel 34 Bee ss joe hepa B's 
7 igi 05037 003254 CLR PR.BIT 
37 15146 03 BR 18$ 
cee Bisse 27 900001 003254 17%: MOV #1,PR.BIT 
7 151 737 037026 18S: ISR PC’ RDBI sSIMULATE NEXT BIT 
37 i ! S DEC RO. i CHECK one REBOY FOR NEXT HEADER WORD 
35 plete? BR238t Bee 1 ;CHECK IF NYE ISHED WITH HEADY 
3538 pti Ze ot 3709 MOV ifs RO OA OAT CEOR GAP 
4 i { i 889308 003256 25S: NOV BR atiom.e1T is MULATE GAP 
oa Gieeig fewer Beas Gh Be Rborr 
RISE Bare . & EKA AEE FITS 
gras Giese Giese, pore wears yak nah. sy et 
74S 12559 16637 000014 003154 MOV RKER(Re) + eR GET E REG 
7 1 3200 SWROATA,E.CS1 3L CTED CS1 
34 1285 Bt 533 eleeta Be3 i0 SIR'OR,E.C L CTED CS2 
oe 15256 012737 900400 003214 MOV #HVRC,E.ER L CTED ERROR REG 
749 015264 023737 3200 003140 E.CS1;T.CS1 :CHECK CSI CORRECT 
3527 Bieseg 6Pbddee RaoR be. i CEP’ SCBRRECTS 
3752 015276 023737 003210 003150 30S: CMP E.cS2,T.cSe ;CHECK CS2 C Cc 
3784 O15306 ght Ror eo CES" hcoenecT OS 
35 S 015310 623737 003214 003154 32S: CMP E.ER,T.ER :CHECK ERROR REG CORRECT 
3756 015316 001401 BEQ TST26 *-YES. GO ON TO NEXT TEST 
3757 015320 104070 ERROR 70 ‘ERROR REG INCORRECT 
759 a3 RRR ERKKRAR RARE KARL RKARARRRRRRRE RA RARRRRREKRERRRAAKKRAAKAE LHS 
3760 :&TEST 26 GOOD HEADER AND PREVIOUS BSE 
3762 * CLEAR RK611 CONTROLLER WITH CONTROLLER CLEAR. PUT 
3763 1% CONTROLLER IN DIAGNOSTIC MODE . ISSUE A WRITE DATA OF 
3764 x ONE WORD TO AN RKO& IN 26 SECTOR FORMAT, CYLINDER 100, 
3765 1 HEAD 0, SECTOR 1. CLOCK THROUGH SEEK AND DRIVE CLEAR 
3766 1 MESSAGES. SIMULATE A SECTOR PULSE AND A HEADER OF THE 


CZR6DBO RK611 OSKLS CTRL PRTY MACYI1 30(1046) O2-DEC-77 10:20 PAGE 72 SES 0072 
CZ2R60B.P11 O02@-DEC-77 10:00 Te6 GOOD HEADER AND PREVIOUS BSE 


ve ;# FOLLOWING 3 WORDS WITH A BAD SECTOR INDICATION: 
768 7% 000100 
3770 :# 040000 
3771 :# 040100 
77 i MAKE SURE NG ERROR IS REPORTED AND WRITE GATE DOES NOT 
3774 1 SET. SIMULATE A SECTOR PULSE AND A HEADER OF THE FOLLOWING 
7 3% 3 WORDS: 
77 38 
37 :# 000100 
3778 :% 140001 
3779 i 140101 
781 1 a MAKE SURE WRITE GATE SETS INDICATING THAT HEADER HAS 
378¢ i BEEN RECOGNIZED. 
3784 ce KRKSLKKKRKRKAARAARAEARAARAERRARERAARARARARAKAARAAAASAARARRARRKRAHRKRKRKKE 
35Be 15364 001200 1Ste6: aoG #10. .STIMES 10. ITERATIONS 
37 15332 MOV ? 7 BRo Ret BASE 
ve ples soppy SEU MACRRTIGED SUE MCENE ty pragnosric moot 
3583 Biesd3 8 MOV eT RKBACRS) iLOAD Bue ADRESS 
3791 015360 002 MOV 8-1, RKWC(R2) ; COUNT -1 
3785 p1eSe8 900020 Nov $160, BKOCYL (Re) LORD RYLINOER on 
7 4 MOV #iWRDATA KCSICR2)’ iis WR DATA 
34¢ Bieues MOV #69. #442, ;1S seROuGH E, bcKs UNTIL READY 
33e9 gisui4 1s MoV sonpincix. xnmickes oO OR PULSE 
tee + 3 
3738 1 We BB DOSE MOV SPMD. RENAL che) 
37 154 DEC RO 
3800 015432 BNE 1$ 
380 15434 MOV #2,R5 ;LOAD HEADER COUNT 
1 440 ode MOV BHEADS , oe LOAD ADDRESS OF HEADERS 
3804 O1 ube 3210 SIRTOR-E ; Bap E eT £33 
380S O01 CLR E.ER tL CTED MRI 
3806 015464 003224 MOV #OMD!MEWD!ECCW,E:MR1  <:LOAD EXPECTED MRI 
3807 Ol CLR HDRCNT ,INITIALT HEADER COUNT 
3808 0154 oo0026 SS: MOV #OMO!MSP,RKMRI(R2) ;SIMULATE SECTOR PULSE 
38039 015504 000026 MOV #OMD, RKMR1 (Re) 
3810 01551 CLR PR. BIT ;GENERATE SYNCH 
3gi1 18 CLR m1 .BIT 
i 1 MOV #255. ,RO 
3813 O15 10S: JSR PC, RDBIT 
3814 15 DEC RO ;CHECK IF SYNCH FINISHED 
3815 015534 BNE 10S 
3816 015536 003254 MOV #1,PR.BIT ;SIMULATE SYNCH BIT 
381 15544 ISR PC’ RDBIT 
3818 15550 MOV #3'R1 ;SIMULATE HEADER 
381 15554 12$: MOV (R3)+,R4 :GET NEXT HEADER WORD 
3820 015556 MOV #16. ,RO ‘LOAD BITS PER WORD 
38e1 015562 003256 15S: MOV PR.BIT,M1.BIT ;STORE PREVIOUS BIT 
3822 015570 ROR RY :GET NEXT BIT 
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003254 


003256 


003224 


PAGE 73 
HEADER AND PREVIOUS BSE 


MAKE SURE NO ane IS REPORTED AND WRITE GATE DOES NOT 
SET. SIMULATE A SECTOR PULSE AND A HEADER OF THE 
FOLLOWING 3 WORDS: 


BCS 17% 
CLR PR.BIT 
BR 18$ 
17S MOV #1,PR.BIT 
as JSR PC’ ROBIT ;SIMULATE NEXT BIT 
DEC RO ; CHECK IF READY FOR NEXT HEADER WORD 
BNE 15S :NO, CONTI 
DEC R1 + OME CK IF FINISHED WITH HEADER 
BNE 125 :NO, CONTINUE 
MOV #66. ,RO :LOAD COUNT FOR GAP 
+ PLUS 2 COUNTS FOR WRTGAT TO SET 
ess: MOV PR.BIT,M1.BI1T ;SIMULATE GAP 
GLa PR.BIT 
SR PC, RDBIT 
DEC RO ;CHECK IF GAP IS FINISHED 
BNE 25s :NO, CONTINUE 
MOV RKCSL(RE), T.CS1 i Get col 
MOV RKCS2(Re).T.CSe 3GET C 
me BERRI” Seek "EQ EBfeecr 
BEQ Sos . YES, CONTINUE 
ERROR Lid >CS1° INCORRECT 
30S: che E.cse,T.cse iC CK CS2 CORRECT 
ERROR et :C * TRCORRECT 
31S: CMP .ER, T.ER :CHECK ERROR REG CORRECT 
BEQ 555 ; Cc TINUE 
ERROR 116 iE G INCORRECT 
328: MOV RKMR1(R2),T.MR1 ;GET MRI 
CMP E.MR1,T.MR1 ; CHECK WRI TE GATE CORRECT 
BEQ 34S iE , CONTI 
ERROR 117 : Ri” INCORRECT 
34S: NC HORCNT il MENT HEADER COUN 
MOV #WRTGAT!DMD! MEWD! ECCW ENR j LOAD OYPECTED MR1 
DEC RS ; CHECK if FINTSHE 
BEQ T5127 +;YES, GO 0 AexT TEST 
IMP Ss 
S + BEEK RERRRRRLER KERR RRRAKKR RARER ARERERAEKRRARRRRRERAARRAERAEKAE 
jkr 27 GOOD HEADER AND PREVIOUS HVRC . 
1 i CLEAR RKBL 1 CONTROLLER WITH A CONTROLLER CLEAR. PUT 
1a CONTROLL R IN DIAGNOSTIC MODE. IS A WRITE DATA OF 
1 a ONE W AN RKO& IN 26 SECTOR FORMAT, CYLINDER 200, 
7" HEAD On O SECTOR 1. CLOCK THROUGH SEEK AND DRIVE CLEAR 
te MESSAGES. SIMULATE A SECTOR PULSE AND A HEADER OF THE 
5 FOLLOWING 3 WORDS WITH A BAD HEADER VRC: 
:% 000200 
5& 140000 
+ 140000 
: 
;* 
;* 


SEQ 0073 
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PAGE 7’ 
HEADER AND PREVIOUS HVRC 


( 
2 GOOD 
;* 
iH 000200 
;% 140001 
‘s 1 1 
+ MAKE SURE WRITE GATE SEES INDICATING THAT HEADER HAS 
FE BEEN RECOGNIZED. 
le en eee 
Rov ' #10. STIMES :D0 10. ITERATIONS 
MOV : ‘20AD RK611 BASE 
MOV SCCLR,{RKCSI(R2) CLEAR ewe 
MOV SOND, RKMRI(R2) :PUT RKG11 IN DIAGNOSTIC MODE 
MOV SBUFE,RKBA(RE) ;L BUS ADDRESS 
MOV 8-1, RKWC (Re) : OUNT -1 
ROY SAMBSBCO nay '*P0Rp eaters SECT 
MOV soO0 RKDCYL (RED - ISSUE WRITE 
MOV #69. #442, RO 31s ENOUGH CLOCKS UNTIL READY 
OR SECTOR PULSE 
1S: MOV #OMD! MCLK, RKMR1(R2) 
MOV , RKMRI (Re) 
DEC 
BNE 1$ 
MOV #2 RS ;LOAD HEADER COUNT 
MOV sHE R3 LOAD ADDRESS OF HEADERS 
MOV SWRDATA,E.CS1  ;LOAD CTED CS1 
MOV #IR!OR,£.CS2 LOAD CT p cS2 
CLR iL CTED MRI 
MOV #OMD!MEWD!ECCW,E:MRI <b EXPECTED MR1 
CLR RCNT jINITIALT HEADER COUNT 
SS: MOV MSP. RKMRI(R2)  ;SIMULATE SECTOR PULSE 
MOV #OMD, RKMR1 (Re) 
CLR PR. BIT ;GENERATE SYNCH 
aa 
10S: JSR BEROGTT 
DEC RO. ;CHECK IF SYNCH FINISHED 
MOV #1,PR.BIT ;SIMULATE SYNCH BIT 
JSR PC; ROBIT 
MOV #3’R1 ;SIMULATE HEADER 
12S: MOV (R3)+,R4 :GET NEXT HEADER WORD 
MOV #16. RO *LOAD BITS PER WORD 
15S: MOV PR.BIT,M1.BIT :STORE PREVIOUS BIT 
ROR RY :GET NEXT BIT 
BCS 17% 
CLR PR. BIT 
BR 18$ 
17S: MOV #1,PR.BIT 
18S: ISR PC’ ROBIT ;SIMULATE NEXT BIT 
DEC RO ‘CHECK IF READY FOR NEXT HEADER WORD 
BNE 15$ :NO, CON 
DEC Ri :CHECK IF FINISHED WITH HEADER 


SEQ 0074 


KO6 


CZR6D80 RK611 pes co PRTY MACYI1 SOCjONe) O2-DEC-77 10:20 PAGE 75 SEQ 0075 


C2R6DB8.P11 - 10:00 GOOD HEADER AND PREVIOUS HVRC 
3935 016274 1354 BNE 12$ ;NO, CONTI 
3 16276 B03380 000102 MOV #66. ,RO *LOAD CAH FOR GAP 
; PLUS 2 COUNTS FOR WRTGAT TO SET 
1 po32S4 003256 25s: PR.BIT,M1.BIT ;SIMULATE 
1631 D03254 CLR PR.BIT 
16314 D3 JSR PC, RDBIT 
1 DEC RO ;CHECK IF GAP IS FINISHED 
1 ess : TINUE 
1 16237 003140 MOV CS1(R2),T.CS1 ;GEt CS1 
1 1 003150 MOV RKCS2(Re):T.CS2 ;GET CSe 
1 14 003154 MOV RKER (Re) +.ER GET ERROR REG 
1 003140 CMP —E.cS1,T.¢Si ; CHECK cSt CORRECT 
1 14 BEQ 30$ :YES, CON INUE 
8 1 not ERROR Leg :CS1° INC Cc 
1 003210 603150 30S: CMP -CS2,T.CS2 + CHECK cSe ORRECT 
1 1401 BEQ 31$ ;YES, CON INUE 
163 041 4 ERROR lel i cSe INCORREC 
1 37 003214 003154 315: CMP .ER,T.ER >CHECK E REG CORRECT 
1 140 BEQ 32S >YES, CONTINUE 
4 Ol i 1 ERROR lee i RR OR REG INCORRECT 
S O16 01623 000026 003164 32S: MOV RKMR1I(R2),T.MR1 ;GET MRI 
16412 3737 003224 3164 CMP B,OR1, T.MRL ;CHECK WR TE GATE CORRECT 
33ea 1Buce 1bsi23 BE ROR i233 MRT’ 
3959 016424 37 003310 34S: HOR j INCREMENT HEADER COUNT 
3360 16430 737 0 003224 MOV BHIRTGAT! DMD! MEWD! ECCH E.MR1 <LOAD EXPECTED MRI 
1 O164 3 DEC ;CHECK IF nf SHED 
32¢ 16440 1402 BEQ T3730 :;YES, GO ON TO NEXT TEST 
3 16442 000137 016150 IMP S 
3936S 55 SF Ae HE SE Se SE EAE SE BE SE SE A A 2 0 a a a a Ha 
3208 j RTEST 30 BAD SECTOR ERROR AND PREVIOUS HVRC 
3968  % CLEAR THE RK611 CONTROLLER WITH A CONTROLLER CLEAR. 
3969 * PUT CONTROL R IN DI STI MODE . ISSUE A 
3970 + WRITE DATA ONE pao YT AN RKOG IN 26 SECTOR 
3971 x FORMAT, CYLINDER 400, HEAD O, SECTOR 1. CLOCK THROUGH 
3972 + SEEK AND apEEVE CLEAR MESSAGES. SIMULATE A SECTOR PULSE 
3973 2 AND A HE HE FOLLOWING 3 WORDS WITH A 
3974 $i BAD HEADER VRC: 
3a5e a 0004 
.e 
3977 # 149900 
3308 : r 
3980 " MAKE SURE NO ERROR IS REPORTED AND WRITE GATE 
3981 + DOES NOT SET. SIMULATE A SECTOR PULSE AND A 
3363 i HEADER CONSISTING THE FOLLOWING 3 WORDS: 
3 i 00040 
3985 * 040001 
3388 +4 o40401 
3988 % MAKE SURE BAD SECTOR ERROR SETS AND HEADER VRC 
3288 i ERROR DOES NOT SET. 
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a9 bleras er H 
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agus Bibres Bess? Boze6) 
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BAD SECTOR ERROR AND PREVIOUS HVRC 


ee a ee et nee 


#10. ,STIMES 3;00 10. ehfene 
SEC Rcsicne> | CPPRR ; kOBD. RKG A . 
e"EUBAIRS? iP Bho Ae i BE _— 
oI. RAN (Re) WORD SuCK AND SECTOR 
#1 ABKPAKRE? no) LBRO 
SWRDATA,RKCS1(R2)" - ISSUE WRITE DATA 
#69. #442, RO ; ISSUE ENOUGH CLOCKS UNTIL READY 
: FOR SECT SE 
#DMD! MCLK, RKMR1(R2) 
BOM, RKMRI (Re) 
13 RS LOAD HEADER COUNT 
a st RAR BODRE SS OF HEADERS 
DATA,E.cS1 L C 4 csi 
aIRtOR,E.CSe LORD EXPECTED Coe 
#OMD'MEWD!IECCW,E: MRI =L EOE CTED MR1 
HDRCNT INITIALIZE HEADER COUNT 
#OMO! MSP, RKMR1 (RE) ;SIMULATE SECTOR PULSE 
#OMD. RKMRI (Re) 
PR.BIT ;GENERATE SYNCH 
mh IT 
#255. RO 
PC, ROBIT 
RO. ;CHECK IF SYNCH FINISHED 
81,PR.8IT ;SIMULATE SYNCH BIT 
A ROG . SIMULAT 
(R3)+,R4 get Ne Xf HEADER WORD 
#16. ,RO BAD BITS P WORD 
PR.BIT,M1.BIT STORE Pre vious BIT 
RY 
17S 
PR. BIT 
18$ 
#L,PR.GIT 
PC’ RDB ; SIMULATE NEXT BIT 
RO :CHECK IF READY FOR NEXT HEADER WORD 
1S$ CONTINUE 
Ri CHECK IF FINISHED WITH HEADER 
125 >NO CONTINUE 
#66. ,RO *LOAD COUNT FOR GAP 
+ PLUS 2 COUNTS FOR WRTGAT TO SET 
PR.BIT,M1.BIT ;SIMULATE GAP 
PR. BIT 
PC; ROBIT 
RO sCHECK IF GAP IS FINISHED 
2s$ :NO, CONTINUE 


SEG 0076 


MO6 


O02-DEC-77 10:20 
BAD 
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SECTOR ERROR AND PREVIOUS HVRC 


MACY11 30( 1046) 
T30 


CZR6DB.P11 02-DEC-77 10:00 
V . 
“oz S1SGR tEBIZ BRBROR BGI =F RKGEARB}- F-68167 
170i2 000014 003154 MOV R‘ Re 24t ER :GET ERROR REG ~ 
RT Re oo a eee 
| g i ; 003210 003150 308: fr ¢-cs2,T.cs2 5 OEE OL NKGS EGRRECT 
Pie ee Oe ei en 
| { 003214 003154 31S: ERE eee T.ER EEE ck ERROR Rec CORRECT 
i BEQ i YES T INUE 
4 i 1“ 3: a amentm ae 
ee 3 . 
mia 170e8 a 889958 rept CMP E.MR1,1. MAL HGheck a cHRITE TE CORRECT 
| 4061 017072 BEQ 345 3 YE 
| u0e3 tbore O41 aus: ENC -ADRONT nualear 
| 4 0171 i terete 003214 , MOV Tece E.ER tL SES HEROERR REG 
| 4065 01711 DEC RS ?CHECK IF FINISHED 
| 4066 017118 O014 BEQ TeT3i 3;YES, GO ON TO NEXT TEST 
4067 17114 137 ol6622 IMP 
| 4069 : = PEKKA KAREREREAARERERRARAAERRARRRRRRERERRRERRERRRE RRA KKK K KEES 
3874 ; kT ST 31 HEADER VRC AND PREVIOUS BSE 
| 407 te CLEAR THE RK611 CONTROLLER WITH A CONTROLLER CLEAR. 
4073 # PUT CONTROL R IN DI hs Roe "Bech 
| dooe oe EBAMaT U8 oat 140, Ro Tok . CLOCK THROUGH 
4076 1 i SEEK kK AND DRIVE CLEAR MESSAGES. SIMULATE A SECTOR PULSE 
| 4077 i BLHEADER OF SF THE FOLLOWING 3 WORDS WITH A HEADER 
4 28 ;* : 
40 ;* ‘ 
4080 1 a 000140 
4081 i 040000 
4 i 040140 
Hoes i MAKE Su SURE NO ER ROR IS Is oREPORTE TED AND pHRITE GATE 
086 i HEADER c TSTIRG OF? FOLLOWING PURREE WORDS: 
4088 :% 000140 
4089 5% 140001 
4030 :# 140101 
4 33 i MAKE SURE HEADER VRC ERROR SETS AND BAD SECTOR 
4093 # ERROR DOES NOT SET. 
40 H «BEGGS KGRERRRARERRRERREKR LRA RERKE A RRRRERKRERARKRK RA KKKKRKRKAKKKE 
4096 017120 oo00004 +8131: SCOPE 
40397 O17le2 012737 oo00012 001200 MOV #10. STIMES ;;D0 10, _TTERATIONS 
4038 917130 0137 00167 MOV SBASE , Re :(OAD RK611 BASE 
4 171 137; oo0000 MOV aRCP ’RKCS1(R2) PEAR RKGLI 
ae Gicie Gieee dees ORTH” FUP oepgezc rm 
4183 pi2 180 Biss, 039548 2 MOV #-l, RKC PRS) tHORD ROUN 
| 
| 
| 


ee 


O46) O2-DEC-77 10: SEQ 0078 


RK OSKLS CTRL PRTY MACYI1 30(1 20 78 
&SRebe-P = ecooe T31 HEADER VRC AND PREVIOUS BSE 


ll Oe-DEC-77 10:00 








4 7164 O1 1 oo0006 MOV #1, RKDA(R2) sLOAD TRACK SECTOR 
aiba 151 1 140 990029 MOV #140, RKDCYL(R2) ”;LOAD CYLINDER 

41 17 1 3 MOV aWROATA,RKCSI(R2)° ;I WRITE DATA 

ue 17 1 26 MOV #69. #442, ; 188 NOUGH OcKs UNTIL READY 
41 7 000026 1S: MOV #OMD!MCLK, RKMR1(R2) 

4103 17 Bee04D nov Poe 

sil 17 BNE 1 

411 1 MOV #2,R5 ;LOAD HEADER COUNT 

4 MOV zh S OF HEADERS 

iia 15 MOV SHEARS Og, it AD EF CS1 

4115 O1 003210 MOV SIR!OR,E.CS2 >L0QD CTED CS2 

ati? pte 003224 Sov SEDIMEWDIECCU.E'HRIY <COAD EXPECTED MRI 

uiig 17 CLR NT. J TNETIAL HEADER COUNT 

411 17, 5S: MOV #OMD!MSP,RKMRI(R2) ;SIMULATE SECTOR PUL 

ais) Bt ee CCR gPORI Re) cenATE SYNCH 

die 17 CLR M1.BIT ‘ 

at 13 10$ mee pe ROBT? 

i 1% DEC RO. ;CHECK IF SYNCH FINISHED 

i 12 003254 Rov #1,PR.B1T ;SIMULATE SYNCH BIT 

4 7 v #3,R1 ;SIMULATE HEADER 

4150 sts 12$: oy ta4a5s RY ?GET NEX HEADER RD 

4131 017354 po0020 MOV #16. ,RO ‘LOAD BITS PER WORD 

413¢ 017360 737 003254 003256 15S: ov pR-@tT, Mm BIT j STORE PREVIOUS T 

4134 917370 103403 BCS 17S . 

wigs bizare Gooves 55" nt a 

4137 

4136 017400 012737 o00001 o03254 17S: MOV #1,PR.B1T 

4 74 47 : *ROBIT ;SIMULATE NEXT BIT 

140 ate 00300 oo on bec RO” _ ;CHECK IF READY FOR NEXT HEADER WORD 
gigs B1o4eB 095301 BNE OCS SCE Ir fe eee METH HERDER 
4144 pt ease 012700 000102 MOV #66. ,RO *LOAD COUNT FOR GAP 

4145 + PLUS 2 COUNTS FOR WRTGAT TO SET 
aia? Biouse Baans> Besse; COsese 25S: nO = PRATT M1-BIT = ;SIMULATE GAP 

414 1744 737 7026 R PC, RDBIT 

ig8 Gi7He Ooesoy bec Be CHECK IF GaP IS FINISHED 
4151 017450 016237 OO00000 003140 MOV RKCS1(R2),T.CS1 ;GEt CS1 

4152 017456 016237 OO000i0 003150 MOV RKCS2(Re);T.CSe ; 52 

4153 017464 016237 000014 003154 MOV RKER(R2),t.ER  :GET ERROR REG 

4158 o174 ge? 37 003200 003140 CMP E.coli, T.¢si ;CHECK CSI CORRECT 

4156 017502 1041 ERROR 130 ?CS1° INCORRECT 

4157 017504 3737 003210 003150 30S: CMP E.cS2,T.cse :CHECK CS2 CORRECT 

4158 017512 001401 BEG 3i$ :YES, CONTINUE 
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-77 10:20 Poue bee 793 SEQ 0079 
HEADER VRC AND PREVI 


RROR ; INC cT 
31S: chp EZER, T.ER Hr ck RROR FEC CORRECT 
ROW bien (Re) T.MRI Hee AR 1 plcopcpesaingets 
_— cH BRI, MR ; CK WRITE TE CORRECT 
Be ae 
gcc te rep | 
ace TeT3e ES. &6 On 43 Aext TEST | 
‘ + PERK EKKEREERRRRE EEE EERE RARER RRA R EERE R RARE RRR EERE E EEE EERE 
; ATE 32 OPI AND HVRC ON LAST HEADER | 
ts AR 1 CONTROLLER WITH A LER CLEAR. 
i# By ONT PEA TK RBTAGN osTzc ove - sie f aa 
te BOL INDE AD 0, 8 SECTOR 1. CLOCK 
: s. S LOCATE CTOR PULSE 
iS BAB‘ 30H war, Bat gone TSTING THE FOLLOW Ne WORDS: 
;* 
-# 
iS 990000 
F 140240 
$% ERROR 15 REPOR Srey one WRITE GATE 
ts auee TE A ULSE AND A 
i Bors COREISTING THE FOLLOWING THREE WORDS: 
2 a 
3% 140000 
:* 14004 
1 i MAKE SURE HEADER VRC AND OPI ERROR SET. 
igzegerorreryrsmntennsenseommmnnsnsonensenmnnensnaneeneoneannt 
ON BBY" Seg STIMES 18818 TEBALEONS 
AR RK61 
Roy OCCLR, RRCSICRE) >CLE Le ounkk teats teiind 
2s: H oul 
BNE 25 i LOOP UNTIL _O é 
(R2) RK611 IN DIAGNOSTIC MODE 
mr PMR, ey EP 
MO #240, RKDCYL(R2) He CYLINDER 
MOV yl RKDAC ) K AND SECTOR 
ROY SEA RURAPG®+"2)cLOE“EsoULs Goes uni. Reo 
31 
FOR SECTOR PULSE 
1S: MOV #DMD! MCLK RKNRL (RE) 
MOV #OMD, RKMRI(R 
| 


CZR60B80 RK611 DSKLS CTRL PRTY 
CZR60B8.P11 O2-DEC-77 10:00 


£ 
Lay) 
- 
w 
oO 


1 
1 


= 
fu 
@ 


0032S4 


SESS ELCLCOCLIOS 


003256 


Pe 2 


Pee 
wi- 





} 


003254 


003256 


ieee Bp 

4 

4263 

4OB4 

use o3 i 3 003214 003154 
ee? B0508 001401 

u5e8 505 1e237 0002 003164 
4270 020230 023737 003224 003164 





10S: 


12$: 
15S: 


188: 
ess: 
26S: 
30S: 


31S: 


32$: 


DEC 


MACY11 -—P off ee wae Ban Crag 


RO 

1$ 

sb} Ra, CSI ie SAD Bert cst — 
#IR!OR, ALE ¢s2 cae . 


!MEWD!ECCH, e'here 


eR TER 
spn ASP rang (RB) NIT}RLIZE HEADER. PULSE 


sRKMAY CRE) on 

$24- sHORCN SSHECK OF BU bONERROR TEST 
PR. -BI IT :GENERATE SYNCH 
RO. ;CHECK IF SYNCH FINISHED 
a »PRBIT ;SIMULATE SYNCH BIT 

* ROBI 
#3,R1 sSIMULATE OPT 
(R3)+ RY T HEB R WORD 
#16. RO iL ITS WORD 
PR.BIT,MI.BIT ;STORE PREVIOUS BIT 
RY :GET NEXT BIT 
17S 
PR. BIT 
18$ 
#1,PR.BIT 
Be? att ; SIMULAT NEXT BIT 
RO :CHECK IF READY FOR NEXT HEADER WORD 
ASS :NO, CON 

1 ;CHECK IF FINISHED WITH HEADER 
1 ; ONT TINUE 

4. .RO ib C FOR GAP 

BIT, M1.BIT ; PMULATE GAP 
Be: ROBIT 
RG’ ;CHECK IF GAP IS FINISHED 
ess ?NO, CONTINUE 
RKCS1(R2),T.CS1 ;GET CS1 
RKCS2( Re)’ T.CS2 i GET coe 
RKER (Re) t.ER GET ERROR REG. 
E.cSI, tsi ;CHECK CSI CORRECT 

¥ B 

ibe 3CS1 INCORRE BF 
E.cS2,T.cse iC CK cse CORRECT 
31$ CON INUE 
101 is” INCOR 
E.ER,T.ER He CK ERROR REG CORRECT 
32$ ; YES CONTI 
i0¢ tERROR REG INCORRECT 
KMR1(R2),T.MR1 :GET MRI 
E.MR1,T.MRL * CHECK TO MAKE SURE WRITE GATE DID NOT SET 


SEQ 0080 


ats pes cre sp 


SELL 
ee | 
wne 





MACY (1046) -DEC-77 10:20 81 
= 3983 ; OPT AND HVRC ON LAST HEADER 


Freon ig COR 


ee a ee ee 


4 BNE 
I!HVRC,E.ER 

: Bt aco f age ‘E.c81 iL9Ao ERROR. BI For END OF OP CONTENTS 

42 35S: DEC ;CHECK IF FINISHED 

: ees ies, aT 

1ee 37S: MOV accu RKCSIC ) ; Peet CONTROLLER 

qoe4 HOY ORE the}, t-CSi . 

2 MOV FKER( Re) t.ER bee ar Ee 

ues MOV s ¥ Ecol ¥ XPECTED cS1 

4288 BEG T3f3e" z 5 CH mr Thext RECT 

128 om 

uses : + RERKEKEEKRRRRRERAERASRRSRRARAASRRARRRRRARAAERRKLARRAARARRARRALAERKE 

ue3e ; ATES OPI AND PREVIOUS HEADER VRC (PART 1) 

4 + FAR ji RobTaanbetye WITH noe. CONT ae Ae CLEAR. 

4 ;* ic, 

4330 $a Bor Con RoC PR SECTOR F FORMAT, 

4338 H Ore atts ae 

4 2 a TOR Sonct TYNG Ee rue, THE 

4300 + i FOLLOWING 3 

4302 + 000 

430 % 140 

ee £ spay 

4306 :% THEN SIMULATE A 3 WORD HEADER CONSISTING ON 

4307 aN THE FOLLOWING DATA: 

4309 + 000 

4310 :% retetate 

431 I + 140200 

4313 te MAKE SURE NO ERROR IS REPORTED AND WRITE GATE 

daa 1a DOES NOT SET. SIMULATE A SECTOR PULSE AND A 

gis 5 HEADER CONSISTING OF THE FOLLOWING THREE WORDS: 

4318 i 990308 

ae i — 

u3e8 is MAKE SURE HEADER VRC AND OPI ERRORS SET. 

: 5 0 hag oe naeiggensoamg Rete ateelai n 

328 pS p3e8 of gos 900012 001200 Roy #10. ,STIMES ;;D0 10. ITERATIONS 

4326 020370 013702 270 MOV $BASE , Re :LOAD RK611 BASE 


SEQ 0081 


CZR6D0B0 RK611 CTRL PRTY 
CZ2R608.P11 C-77 10:00 


ee 8 


f 
$: 


ct 


SEESCLELCLCLSCLCLSSELSCLLSSCLSLEL LIES 


a Tuan EP EE REE ct 


SEEESCSCLSCLESCLSSCLCSLSESLLSSLS£S 


Rett 





003254 
437 000 
1378 ba7026 
437 
352 
4375 
: goo 
437 peseu 
ee ae 
4381 
4382 


MACY11 — 


0032S4 


003256 


0032S4 


003eS6 


1S: 


10$: 


12e$: 
153: 


17S: 
18S: 


ess: 


OPT ARO 


Been Seseanes Seeeeeemnes 


EO? 


-77_ 10:20 PAGE 
PREVIOUS HEADER 


#CCLR, RKCS1(R2) 
$5500" RO 


vac (PART 1) 


CLEAR RK 1 
iS COUNT FOR STALL 
C coun 


$ 
RO $ 
3 UNTIL _O 
RKMRI (RE) ; RK611 IN I STIC MODE 
RKBA(RE) 3L DUMMY Sup ER ADDRESS 
8-1, RKWC(Re) : T= 1 
#300, RKDCYL(R2) 3L NOER 
#1, RKDACR2) eb K SECTOR 
#WRDATA,RKCS1(R2) <1 WRITE DATA 
#69. #442, RO j ISSUE ODKS UNTIL READY 
: CTOR SE 
#OMD! MCLK, RKMR1(R2) 
#DMD, RKMRI (Re) 
1 
is *LOAD HEADER COUNT 
Sopis Ra > LOAD AEORES OF HEADERS 
pievotceseSS! LBB BSpeCreR § 
i eS cite vi EEO MRI 
HORCNT ; pint TALE HE COUNT 
'MSP,RKMRI(R2) ;SIMULATE SECTOR PULSE 
ae , Racial ¢ CHECK IF AL ADERS DONE 
325 i See - aT FO ERROR TEST 
PR.BIT :GENERATE SYNCH 
He ae 
Be ROOT? 
RO. ;CHECK IF SYNCH FINISHED 
#1,PR.81T ;SIMULATE SYNCH BIT 
PC’ RDBI 
#3°R1 ;SIMULATE OPI 
(R3)+,R4 :GET NEXT HEADER WORD 
#16. RO ; LOAD BITS PER WORD 
PR.BIT,M1.BIT ;STORE PREVIOUS BIT 
RY :GET NEXT BIT 
17S 
PR.BIT 
18% 
#1,PR.8IT 
PC’ RDBIT ;SIMULATE NEXT BIT 
RO :CHECK IF READY FOR NEXT HEADER WORD 
15S :NO, CONTINUE 
Rl *CHECK IF FINISHED WITH HEADER 
128 !NO, CONT INUE 
#64. ,RO :LOAD COUNT FOR GAP 
PR.BIT,M1.BIT ;SIMULATE GAP 
PR.BIT 
PC, ROBIT 
RO ;CHECK IF GAP IS FINISHED 
2s$ :NO, CONTINUE 


SEQ 008e 





Cc RK611 S CTRL PRTY MACY11 30(104%6) O2-DEC-77 10:20 PAGE SEQ 0082 
S Pil C-77 10:00 hind OPI AND PREVIOUS HEADER vac (PART 1) 
- RKCS1(R2),T.CS1 ;GET C ; 
364 RKeeS RS)’ Tce GFT £33 
4 RK Rc Re) +.ER  :GET ERROR G 
4 .cS1,7.¢Si jCHECK CSI Cc cT 
be ; YES, a 
4 iCS1 I Cc 
4 .cS2,T.CS2 + CHECK ORRECT 
: IESE IMCORE scone 
4 R,T.ER HEHE CK ROR REG C CT 
4 a T-MRd ioe MR plearesines: 
4 E.0R1,T : CHECK fe MAKE SURE WRITE GATE DID NOT SET 
4 1g? Me ! 
4 PING NT NT HEADER COUNT 
44, 31. HORCNT ;CHECK IF AST _HEADE R 
SOPI!HVRC, E.ER ; IT 
Wie Bt #G0 6 .CS ‘4.cal tADJUST E.CS1 FOR END OF OP CONTENTS 
= i : DE 5 CHECK ae FINISHED 
44 1 4y IMP TOR 
44 107 1 oF Bad 000000 37%: MOV Beck RKCS1(R2) :00 ee CON ROLLER 
4409 1104 O1 503140 MOV RKCS the), 1.CS1 5GE ; 
441 tite 1 10 003150 MOV RKCSe(Re),T.CS2 j 
4411 11 1 14 003154 MOV RKER(Re), t.ER ; 
wis Seites Gesrar B88iNG Bass00 ic IS a a 
4414 651133 B54 1 So Téf34" ; To NEXT RECT 
uals 021144 104153 ERROR 153 
4417 5 + REKKEKKKRRRARERERRSSRRARRERARRRRRERARERRERARRERE RRR EARKRRE 
att j ATEST 34 OPI AND PREVIOUS HEADER VRC (PART 2) 
44 :# CLEAR not CERN CONTROLLER WITH A CONTROLLER CLEAR 
44 ; C MODE A WRITE 
idee ie eves ae Hoad 79 AN Bead” ae IN e sclTOR comet, 
ies f ee a NE SEER A eTETIRE oe TSP 
4426 . :# Puts Bo eee wae 
4427 ;* 
4428 1% 000040 
4429 7% 140000 
aa i _— 
4432 1 MAKE SURE NO ERROR Is REPORTED AND WRITE GATE 
4433 1 DOES NOT SET. SIMULATE A SECTOR PULSE AND 31 
age i HEADERS CONSISTING OF THE FOLLOWING THREE WORDS: 
4436 : 000040 
4437 ;* 140000 
4438 ;% 140040 


C 
C 


-Pil 


bb bb bb bb be 


“ 


SREONERETSSRON TROT TES TREN RES PIRROR 


ESR20REs 


ote 


RAVAN LVVVVVVVGVOVTVCCTUC OUTDO UOD BUD TDDB UBUD MON 


bb 0 bb he ee 


ftcrce 
oo 
=f 


12700 
37 


N 


earecaas 
Se 





RK611 at PRTY 


0:00 


003200 
003210 


GO? 


MACY11 30(1046) O2-DEC-77 10: PAGE 84 4 
SP SUMO) OPE BND PREVIOUS HEADER VRC (PART 2) s0 GUS 
g@ 
is MAKE SURE HEADER VRC AND OPI ERRORS SET. 
« SESKRASSAASKSKRSSAAASRAASSAAKRERAAAAAARERARRARARAKRARARARRARRKRARSRAE ES 

cen SCOPE 

HOV #10. ,STINES 570010. _TTERATIONS 

v WCCLR,RKCSI(R2) }CLE CLEAR RKB1Y 
v : COUNT FOR STALL 

” oe t«‘é :DEC counT 0 

nov SOND RMR (RE) PUT RK611 IN DIAGNOSTIC MODE 

8-1, RKWC (RE) LoeB = 1 

HOY SI CRRDACRES CORD CT RAnE AND CTOR 

MOV sWRDATA RKCS1(R2) ong WRITE DA 

MOV 869. #442, 31 UE ENOUGH cLOOKS UNTIL READY 
1S: MOV #OMD!MCLK, RKMR1(R2) 

MOV ,RKMRI (Re) 

DEC RO 

AOC L R COUNT 

MOV 14,R3 it SAB AEBRESS oe HEADERS 

MOV auRDATA,E CSI ; LOAD EXPECTED CS1 

CLR : ee it ORD et ERROR REG 


003224 


oo0de6 
Bb3310 


003254 


003256 


003254 


MOV 
BOY ABD PEMOSECOM.E- FA GROPP EGER CMU 
Ss: Rov ORD MSP, KMR1 (RE) ita e§e OR PULSE 


10S: JSR PC, ROBIT 
DEC R ;CHECK IF SYNCH FINISHED 


1 
MOV #1,PR.BIT ;SIMULATE SYNCH BIT 
JSR PC; RDBIT 
MOV #3.R1 : SIMULATE E OPI 
12$: MOV (R3)+,R4 T HEADER WORD 
MOV #16. ,RO * LOFID "be Tous" 
1SS: MOV PR.BIT,M1.BIT $ BIOmE vi US 
ROR RY 
8CS 17% 
CLR PR. BIT 
R 18$ 
17% MOV #1,PR.BIT 
18$ JSR PC; RDBIT ;SIMULATE NEXT BIT 
DEC RO : CHECK IF READY FOR NEXT HEADER WORD 
BNE 15S ?NO, CONTINU 
DEC R1 :CHECK IF FINISHED WITH HEADER 


Cc 


CZR60B0 RK611 OSKLS iy PRT4 
ZR608 . P 


il 02-DEC-77 10:00 
4949S 021466 001354 
4496 021470 012700 000100 
ua 8 am 
He Ble 
1$12 

See BBIES BUSS HERES ate 
Se BLES HE cosei0 oasiso 

eesemont 

1g 1 3747 003214 003154 

1 1 140 

1 1378 6 ie 

14 1576 01623 003164 
Sie BBiEtS Baycar HR OnE 
451 tpte 104113 
S18 IES BOSH GBBRIP cosaio 
4520 1630 ee — 
ee) Bibs bigs Ee 
desa OSes 7 100200 003200 
wear 1656 001402 
Ses, BBIES lecey ABO ors 
4Se9 1 16e37 000010 003150 
ee eiste BISe HRA Biles 
i235 061730 051401 003140 003200 
4534 17 1041 
4S35 
4536 
4537 
4538 
ie 
4541 
4S4 
44 
4E44 
4545 
4546 
4547 
wo4e 


4549 
4550 021734 o00004 


MACY11 30( 1046) 
T34 
ess: 


26S: 


35S: 


37S: 


linden tiatiatiainaiiatad 


= = oo shakane nana 


02-DEC-77 


HO? 


10:20 PAGE 8S 


OPI AND PREVIOUS HEADER VRC (PART 2) 
MOV ae RO Noho cou T FOR GAP 

bok BR-B}}-M1-e17 + ST MUL BIE GaP 

SR PC, ROBIT 

DEC 58 ; CHECK IF GAP IS FINISHED 

MOV 51 cn2>,1.c54 >GET cor 

MOV RKCS2(Re).T.CSe ;GET C 

MOV RKER(Re) +.ER GET ERROR REG. 
CMP —E.cS1,T.¢Si ; HECK CS1 Cc cT 

FERoR hi ite _ ORAECT 

CMP .CS2,T.CS2 :CHECK CS2 CT 

PRROR iif 52" INcoRRECT 
CMP blee t ER r€ che RO REG CORRECT 

il i TRRor Ree MHEORRECT 

MOV RKMRI(R2),T.MR1 ;GET 
CNP Birt, 1. MRL Weed 0 SURE WRITE GATE DID NOT SET 
ERROR 113 iMRI 
Ie om RES REASON 
MOV SOPI!HVRC, E.ER — 
BIC #GO,—.CS1° iL ErgOR E. bce FOR END OF OP CONTENTS 
Bia BROTICERR, soe ;CHECK IF FINISHED 
BEQ Os :YES - SKI 
IMP icc ; NEXT SECT 
MOV r cLR RKCS1 (RE) CLE CONTROLLER 
MOV Sitr Re), ; csi 
MOV RKeSa Re)’ T.CS2 cS2 
MOV RKER(R2), t.ER ER 
MOV #ROY.E£.CS1° *SET EXPECTED CS1 
CMP T.cS1,—.CS1 :CHECK IF CORRECT 
BE Tt Ts +;GO TO NEXT TEST 


ROR AND HVRC SE 
CONTROLLER ERROR RESET 


| SER Ueno eeeeinen eens 


eT DD sLae.m.mCmCm... 


BSE AND CONTROLLER ERR 
CLEAR RK611 conn ee A Be CLEAR. 


Bane 2 sBSe é ERRO 
T. CL — CONTROLLER AND MAKE SURE 


oanate A WRITE DATA 


"eCOck RO AROUGH SEEK 
IMULATE A SECTOR PULSE 
E SURE CONTROLLER 


SEQ 008s 


I0?7 






CZR6DBO RK611 DSKLS CTRL PRTY  MACYIL1 30(1046) O2-DEC-77 10:20 PAGE 86 SEQ o086 
CZR608.P11 02-DEC-77 10:00 T35 BSE AND CONTROLLER ERROR 
455 1736 O1 001200 MOV #10, STIMES ::D0 10 ITERATIONS 
45 1744 O1 te MOV Re :LOAD RK611 BASE 
45 1 1 MOV 8cc RKCSI (RE) i CLEAR RKGLI 
4554 1 1 MOV RKMRI(R2) ;PUT RK611 IN DIAGNOSTIC MODE 
ue 1 1 MOV RKBA(R2) LORD DUMMY Bus ADDRESS 
1 MOV 8-1, RKWC (Re) : COUNT=1 
5 1 MOV #0,RKDCYL(R2) ;CLOAD CYLINDER 110MS 
1 MOV #0; RKDA( Re) “LOAD TRACK AND SECTOR 
4 Ol MOV SWRDATA, RKCS1(R2 : ISSUE COMMAND 
1 MOV #69. #442, RO ; ISSUE ENOUGH oF KOSKS UNTIL 
4 : sober ay a sta rT FOR SECTOR PULSE. 
3 00040 pODDSE : nov SOND, RKMAL Che) 
4565 BNE 1 
we MOV #OMD!MSP,RKMRI(R2) ;SIMULATE SECTOR PULSE 
456 000026 MOV #OMD, RKMR1(R2) 
w3e8 cLR pe. BtT ;GENERATE SYNCH 
MOV : -1 RO ; 
457 SS: JSR PC, RDBI 
45 DEC RO ;CHECK IF SYNCH FINISHED 
B74 106 003254 ROY ai /PR.BIT ;SIMULATE SYNCH 
4578 1 sHEAD2, R3 ;LOAD HEADER 
45 1 MOV #3,R1 :LOAD WORDS PER HEADER 
de59 i — cre)+ a OBITS PER WORD 
4580 1 003256 12S: MOV PR.BIT,M1.BIT ;STORE PREVIOUS BIT 
458 44 ROR Rae :GET NEXT BIT 
4 1 003254 CLR PR. BIT 
vey Geeley Bb0%ds aa 
1 27 001 oo3254 15S: MOV #1,PR.BIT 
4 Beeied Bos7a7 37026 165: ISR Ba’ Rpatt ;SIMULATE NEXT BIT 
4588 6170 905300 DEC RO. ; CHECK odf READY FOR NEXT WORD 
deat oee178 7364 Bre Oss HECK TF leg teee METH MERCER 
HESE 022208 le wy 000101 MOV #65. , RO 5 Sale 
4593 : o5037 g03254 003256 20S: nov PR.BIT,M1.BIT ;SIMULATE GAP 
deee BSss é 7 We ISR PC, ROBIT 
456 D222 2309 DEC RO. ; CHECK off GAP FINISHED 
45 5 blero 4200 a nov Hee <25B. 1b. 256.) 464.>, RO ;LOAD COUNT UNTIL POSTAMBLE 
2 000040 000026 . MOV sorb ;RKMRIL (Re) 
ieee Beeess Berane Be 
46 2 16237 000000 003140 MOV RKCS1(R2),T.CS1 ;GET CS1 
4604 O22260 016237 000010 003150 MOV RKCS2(Re)’T.CS2 :GET CS2 
4605 Oeee66 016237 000014 003154 MOV RKER(R2),t.ER  :GET ERROR REG 
4606 Oeee74 012737 100222 Oo03200 MOV #CERR!RDY!WRDATAR<#C<GO>>,E.CS1 ;LOAD EXPECTED CS! 


CZR&DB0 RK611 OSKLS C 
CZR608.P11 


+. 
oe 
3 


eee | 


FETTESTES. 


& PiRneeneereeeees 


056310 
6 


OeeS7e 


Ue- bec<7 


ae 


= 
1) 
N 


“I 


OO00000000 
~ 


—— hb bb 


o00 oO 
= —— 

So-o0 

Hd it + Ay pe 

WNNOON 

Ow) 

ONON 


po0oce 


000026 
000026 


ooo026 
000026 


30(1046) O2-DEC-77 10:20 PAGE 87 
T3235 BSE AND CONTROLLER ERROR 
MOV #IRIOR,E. .cs2 ;LOAD XPECTED cse 
MOV ‘LOAD EXPECTED ERROR REG 
CMP .cS1,T.CS1 i CHECK cSi Cc T 
GQ 3 XE » .CON 
RROR i ics ol Cc 
308: CHE E.cS2,T.CSe ie ose CORRECT 
ERROR 137 iS ORAL CT 
32S: CMP E. R,T.ER RROR REG CORRECT 
629 ; IP 
ERROR 14 iY G INCORRECT 
35S: MOV R RKCSI (RE) gem & CONTROLLER 
MOV RKCS1tR2),7.CSi 
MOV RKCSe (Re) T,C5e ; 
MOV RKER(Re), t.E ; 
MOV #200,E.C51 ‘SET EXPECTED cst 
CMP T.c31,£.CS1 :C CK IF F CORRECT 
BEQ tet ; TEST 
ERROR 1 tERROR’ one NOT CLEAR 
. jfesseasuaeeeneene MD CHIRAL iA 
; ATE T 3% HVRC AND ERROR 
5 Sur Conte RKB II iS ER WITH A CONTROLLER CLEAR. 7 
is inbeRe * afore TOR FORA 
;# CYL “ioe OCK THROUGH SEEK 
1 a AND DRIV S. rain oi SECTOR PULSE 
1 i Leak he A RROR. MAKE S CONTROLLER 
; E on BAD HVRC SET. CLE ERONTROLLER MAKE SURE 
i CONTROLLER ER RESETS. 
es REKKMREKEKKARKRRKERERERRAKEEASARRRRARERRAARRARRRRRRRRERAKAAR KLE 
+8136: SCOPE 
MOV #10. STIMES ;;00 10. ITERATIONS 
MOV SBASE , Re ;LOAD RK611 BASE 
MOV ace Tenet tes) ) }CLEAR RKBI I 
MOV 1(R2) ; RK611 N DIAGNOSTIC MODE 
MOV RKBA(R2) ;LOAD DUMMY BUS ADDRESS 
MOV #- Mesth jHORD C T=1 
MOV y RKDCYL(R2) *sL eur INDER 
MOV #0, RKDA(Re) j LORD TRACK AND rai 
MOV ai A, RKCS1( Re) 
MOV 442, RO 


S$: 


Is CLOCKS UNTIL 
TS BE Oy hough ch cK PULSE . 
MOV #OMD! MCLK rane che 

MOV SOND, RKMRI CR 


DEC 
BNE e 

mov SOND! NSP RKMR (R2) ;SIMULATE SECTOR PULSE 
CLR pete ;GENERATE SYNCH 

CLR M1.BIT 


DEC RO ;CHECK IF SYNCH FINISHED 


SEQ 0087 


A — 


CZR6DBO0 RK611 DSKLS CTRL PRTY MACYI1 30(1046) O2-DEC-77 10:20 PAGE 88 SEQ 008s 
CZ2R6DB8.P11 O2-DEC-77 10:00 T36 HVRC AND CONTROLLER ERROR 





wes] GBEEr 8017 OH 
4 76 g 9 1 003254 mov 81, PR BIT ;SIMULATE SYNCH 
eee io Ol 74 MOV #HEADIO,R3 ; LOAD HEADER 
466 4 012701 MOV #3,Ri L PER HEADER 
1ee8 i my ie coa)+ EO SITS PER. WORD 
ieee 003256 12S: MOV PR.BIT,M1.BIT ;STORE PREVIOUS BIT 
ae78 ROR Rae :GET NEXT BIT 
467 003254 CLR PR.BIT 
m: San BR 16$ 
4676 2737 000001 003254 15S: MOV #1,PR.BIT 
46 7 037026 16S: JSR PC; RDBIT ;SIMULATE NEXT BIT 
46 DEC RO :CHECK IF READY FOR NEXT WORD 
467 1 BNE Les :NO, CONTINU 
Gest T354 BRE OCS EE I eg ee MITH HEADER 
dose 1 000101 MOV #65. RO ie, 
1 003254 003256 20S: MOV PR.GIT,M1.BIT  ;SIMULATE GAP 
dees 7 3254 CLR PR.BIT 
7026 ISR PC, RDBIT 
4667 DEC R i CHECK obf GAP FINISHED 
dees 12700 921200 ea oe mov G28 266. 16. 25k. >464.>, RO ;LOAD COUNT UNTIL POSTAMBLE 
4630 Boo040 000026 A Moy #0MD, RKMRI (Re) 
e932 i BNE S$ 
46 i 000000 0031 MOV CS1(R2),T.CS1 ;GET CSI 
4eo4 1 10 031 0 MOV RKCS2( Re). T.CS2 i GET CS2 
4eus 1 4 003154 MOV RKER(Re), ft. *GET ERROR REG 
4636 1 1 MOV #CERR! ROY! TAR<#C<GO>>,E.CS1 ;LOAD EXPECTED CS1 
46 1 3210 MOV #IR!OR,E.CS2 3L EXPECTE cs2 
4638 MOV sHvRC, EER ib XPECT RROR REG 
140 CMP E.CS1;T.CS1 :CHECK CSI C Cc 
73 rou Fifon iit Ler shebene 
47 ' 3737 003210 003150 30S: CMP é ese, T.cs2 :C ck'é ORRECT 
oy Gears TUG Erion as tee Reinet 
4705 3737 003214 003154 32S: CMP —.ER,T.ER :CHECK ERROR REG CORRECT 
709 BB atte Ea + eon REG INCORRECT 
4708 O23044 Ol2762 100000 oo0000 35S: MOV #CCLR,RKCS1(R2) ;CLEAR CONTROLLER 
4709 Oe 016237 999900 00314 MOV RKcS1 (Re), TCS :GET CSI 
471 3065 16237 10 00315 MOV RKCS2(Re):T.CS2 ; ¢52 
4711 Oe 16237 000014 3154 MOV RKER(Re), T.ER  ; ER 
471 ge3074 e737 03200 MOV #200,£.CS1 *SET EXPECTED CS1 
471 io2 737 3140 003200 CMP T.cS1,€.CS1 :CHECK IF CORRECT 
4714 023110 001401 BEQ TST37 = GO T TEST 
uZis O23li2 104153 ERROR 153 *ERROR DID NOT CLEAR 
4717 a3 SKLAR HKAELRARRKAAKAKAARKKAK KARAS RE RE RARER RKRAKAA ARAL HHA KRRHKEKE 
4718 :&kTEST 37 READ DATA AND HVRC ERROR 
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eT ee aye ae ary 
RARRE RAED 
Ni 
N 


= 


13 
oe He 
eS4 
0058037 003256 
rice 


MACY11 


Boodee 


0032S4 


0032S6 


003254 
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30(1046) O2-DEC-77 10: PAGE 89 
137 READ DATA AND HVRC ERROR 
-# 
, 
2 L RK611 R WITH A CONTROLLER CLEAR. 
i CONTR LER IN DYAGNOST IC COR " 1S 
iH Gr INGER AER B NF oR G. cL8cK HROUGH 
it RB OCA Pris A! & 
Le E AND HVRC SET. CLE 
;* CONTROLLER ERROR RESETS. 
; oS ame gages maaan aaa este pcamNpinitaEb SEA 
nov STINES 33 BRo Rie IT" Bas ONS 
MOV SCCLR>RKCSI(R2) ; iCPERR 
MOV RKMR1 (Re) PRET tN DIAGNOSTIC MODE 
MOV #BUFF , RKBA(Re) iL DUMMY BUS ADDRESS 
v s- (Re) COUNT 
v é RKO YECR2) YL INDER R 110MS 
MOV aRODATA, RK renal wis SSUE COMMAND 
MOV #442, AS s ISSUE elducH CLOCKS UNTIL 
READY FOR SECTOR PULSE. 
1S: MOV #DMD! MCLK Ranma (Re) 
MOV #O0MD, RKMRI (Re 
DEC RO 
BNE 1$ 
MOV aOMD! NSP RKMRI(R2) ;SIMULATE SECTOR PULSE 
MOV r RKMA1 (Re) 
CLR PR. BIT ;GENERATE SYNCH 
CLR m1.BIT 
Ss: R pe, ROGIT 
DEC RO ;CHECK IF SYNCH FINISHED 
MOV #1,PR.B1T ;SIMULATE SYNCH 
JSR P poet! 
MOV #HEAD1O,R ;LOAD HEADER 
MOV #3,R1 LOAD WORDS PER HEADER 
10S: MOV (R3)+,R4 GET NEXT WORD 
MOV #16. ,RO iL BITS PER WORD 
12$: MOV PRO BtT,m1.B81T  ;STO VIOUS BIT 
ROR RY GET NEXT BIT 
BCS 15S 
CLR PR.BIT 
BR 16$ 
158: MOV #1,PR. BIT 
16S: JSR PC’ RDB ;SIMULATE NEXT BIT 
DEC :CHECK IF READY FOR NEXT WORD 
BNE les ;NO CON 
DEC CHECK IF FINISHED WITH HEADER 
BNE Tos :NO, CONTINUE 
MOV #6 
208: mov PR. ety, M1.BIT ;SIMULATE GAP 
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MACY11 | es O2-DEC-77 10:20 PAGE 90 


READ DATA AND HVRC ERROR 


bec pone ; CHECK IF GAP FINISHED 
ROW 20S ace ac1e. noskesesoN AN 1 ono COUNT UNTIL POSTAMBLE 
ess: MOV SOMO! MCLK , RKMRI (RE) 
bee igen oe 
MOV RKCS1 (RE), T. eo ie Ser ese 
Mov 8s RRER TASS TER 
MOV mare ated tee see -LOAD EXPECTED CS1 
nov sHVAE;E-ER Lap ef SFE on REG 
CHP E.cSl, .CS1 Ca CK CSI CORRECT 
PRROR 141 YES rCOnT TNE 
30S Bro ,G52,T.CS2 he geod cORT ThE CORRECT 
328: CMP ter, T.ER CK CORAECh REG CORRECT 
35$ ERHOR Ff R,RKCS1( ie AR CONTROLLER cfr 
MOV ARES ROS “ee ay 
mov RKCSe(Re), 7. C egse Ge3 
HOV oS Brest: beer BR TED CS1 
CMP T.cS1,—.CS1 ;CHECK I a. RECT 


ERROR 183° $6080 ote N NOT 1 alear 


s Ta  atiataim 
j ATE WRITE CHECK AND HVRC 
CLEAR RK611 WITH A CONTROLLER CLEAR 


11 CON 
PUT CONT! al” Soe A Fe Oa Te 
S se qe oe 
Ree Ge Feces 


i alta aL TET 


+T40 


coe tN ell 
mR ah Ws STeRRRELIC ree 


MOV #300 RKDCYL(R2) ";LOAD C NINDER 1DMS 


We Ce ea ee 


MOV 0, RKDA(Re) -£bORO, TRACK AND oSeGTOR 
MOV sua TCH Retsa cred nek A COMMAND 
MOV 4+2,RO ; ISSUE ehouen” CLOCKS UNTIL 


SEQ 0090 


c RK611 LS CTRL PRTY MACYI1 30(1046) O2-DEC-77 10:20 PAGE 91 SE 
ESReDe- Pi B<becsy? 10:00 3980 WRITE CHECK AND HVRC Pe 





ue 
4 76 D0044O 1S: MOV 'MCLK, RKMR1(R2) 
ue33 be 3908 pBpo4D © BOODSE MOV SOND. RKMAL Che 
4e34 le DEC RO 
ue 14 BNE 1$ 
ues? Bopese Opobse wae men ee 
4 4 cLR pe. BET ;GENERATE SYNCH 
4 77 MOV #255. RO 
7026 Ss: JSR PC, ROBIT 
484, DEC RO ;CHECK IF SYNCH FINISHED 
aeaa 3 000001 003254 BOY #1,PR.BIT ;SIMULATE SYNCH 
4 047 037026 JSR PC’ RDBIT 
Bde 127 3474 MOV #HEAD10,R3 ;LOAD HEADER 
wewg Gevom) Glce) [MF og, FY aS my Ge noe MERON 
484 1 MOV #16. RO ;LOAD BITS PER WORD 
u850 3737 003254 O03256 12S: MOV PR.BIT,M1.BIT STORE PREVIOUS BIT 
4 14 ROR Rae :GET NEXT BIT 
003254 CLR PR. BIT 
4 3 168 
BSE 012737 o00001 003254 15S: #1,PR.BIT 
7 0370 16S: ISR PC’ RDBIT ;SIMULATE NEXT BIT 
4 DEC RO ‘CHECK IF READY FOR NEXT WORD 
1 BNE 12S ‘NO, CONTINUE 
4860 oe DEC Ri :CHECK IF FINISHED WITH HEADER 
4861 1354 10$ :NO, CONTINUE 
4862 0127 000101 MOV #65. ,RO 
4863 O24054 37 3254 003256 20S: MOV PR.BIT,M1.BIT  ;SIMULATE GAP 
4864 O24062 7 3254 CLR PR.BIT 
486S 4066 37 037026 PC, RDBIT 
deep BRErs BTS? Be Be GEKA SOE FINISHED 
use8 076 O1 1200 MOV #2%<256.+<¢16.*256.>464.>,RO ;LOAD COUNT UNTIL POSTAMELE 
4859 102 O1 440 OO0026 25S: MOV #OMD!MCLK, RKMRI(R2) 
471 it 127) 0040 oo00e6 MOV SOMO, RKMRI (Re) 
7 1 1 ess 
4873 ts ih 3140 MOV RKCS1(R2),T.CS1 ;GET CS1 
4874 1 i 1 3150 MOV RKCS2(Re).T.CcSe :GET CSe 
4875 136 016237 000014 3154 MOV RKER(R2),¢.ER :GET ERROR REG 
487 Geis Ee 209180 903200 mov WCERR! RDY!WRTCHKE< #¢<G0)>,6.CS1_ ,LOAD EXPECTED CS1 
W878 Dele 18333 posta MOV SHURE E°ER it OAD EXPECTED ERROR REG 
4873 166 023737 003200 003140 CHP g.cS1,T.CS1 i CHE K SS CORRECT 
4881 176 104141 ERROR 141 OEP CORRECT 
uege 200 3737 003210 003150 30S: chr E.cS2,7 cs2 ;CHECK CS@ CORRECT 
4884 Of4210 104142 ERROR i4e ?CS2° INCORRECT 
4885S Oe42le 023737 003214 003154 32S: CMP E.ER,T.ER :CHECK ERROR REG CORRECT 
4886 O2e4220 001401 BEG 35$ :YES - SKIP 


omg pexts c38 cm sp 


eh ee 
ONOU CWE 
PSeoS 
CoO oz 
pb Rs fe be po pe be 
furu tw 
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4942 024470 
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003256 


HU FEZ MB nl % 


ERROR 1 ;ERROR REG INCORRECT 
3ss: MOV ac RKCSI »; EAR CONTROLLE 

MOV Rees tRe),T. ; cs 

mov RKC (Re) T : 

MOV #00 6-081" iseT CTED cS1 

CMP T.cS1,€.CS1 3CHECK IF CORREC 

Q Terai $:G0 TO NEXT TEST 
ERROR 1 3é DID NOT CLEAR 


-SBTTL ##ECC GENERATION TESTS 


ae ere Pe 


; ; ATEST ECC INITIALIZATION 
: T R MITH A CONT LER CLEAR 
if any ae TIC MODE She A WRITE 
i reali Ei 7 THROUGH 
, 
it cog He URE THE ESC BaTTERN OY FOUR 
i Cranes he 
Op Poe EpcreapeMI Re 
HOV #10.,$ TIMES _tTERAT ONS 
MOV sense. RKCS1(R2) £880 Ri} 
nov sonD A (Re) PUT RK6 thy N DIAGNOSTIC MODE 
MOV 8-10, RKWC (Re) + LORD Cc 
MOV SUADATA RKCS1 (RES ;iSSuE Taig DATA 
MOV #8. #37.,RO ; ISSUE ENOUGH CLOCKS UNTIL 
i. anes Mabe ran bo) FE Y FOR SECTOR PULSE 
: MOV Hitt RKMRI CR 
BRE 
mov pW Nec ;SIMULATE SECTOR PULSE 
cLR PR R. BIT ;GENERATE SYNCH 
MOV #255. .R 
SS: JSR PC, RDBI 
DEC RO ;CHECK IF SYNCH FINISHED 
HOV 81,PR. I ;SIMULATE SYNCH BIT 
MOV *R1 ;SIMULATE HEADER 
MOV #HEAD1,.R3 ; CYL O, TRK O, SECTOR O 
mo Cha)+ 505 7 Rext MERpeh ORO 
15S: MOV PR BtT. M1. BIT : STORE PREV IOUS BIT 
ROR R4 :GET NEXT BIT 


SEQ 0092 


COs 7 





CZREDBO RK611 OSKLS CTRL PRTY MACYIL1 30(1046) O2-DEC-77 10:20 PAGE 93 SEQ 0093 
CZR60B.P11  O2-DEC-77 10:00 T41 ECC PNITIALIZAT ION 
are bas ert 
aR 18$ 
003254 173: MOV #1,PR.8IT 
188: bec er iGHeck Ee xy FOR NEXT HEADER WORD 
Bee 1 5 CHECK i NISHED WITH HEADER 
v He 1 Ao mUL ATE ar #1 FOR SWITCH FROM READ TO WRITE 
003256 20S: Vv -BtT,M1.B1T 
CLR PR-BIT 
bee RO" ;CHECK IF GAP FINISHED 
BNE Fl :NO, CONTINUE 
— nov Hob. JRO ;LOAD COUNT FOR SYNCH FIELD 
cLR pi -eit” ORT TAL T — B #2 
gh ABT 
LR “BIT 
003224 Cee ccuIMEMDIWAT RAT ECHAT “LOAD EXPECTED MR1 
i ‘ 255: Johan SCRE MATE BET ccs 
INC BITCNT : INCREMENT BIT COUNT 
S304 Bas Ko sei 
4 003252 MOV #1, PL BIT :SIMULATE SYNCH BIT 
4 a ZRROR tert 
‘ eee CLR BITCNT ; CLEAR i ie 
358 —_ CCR eee , ik ROP R RE of hee cre ect PATTERN 
i MOV #€CC1,R3 iLBeb & 
4 15504 30S: nov te nt RY H oa 
#1382 g us eee aa mov aie, RO . LORD its PER WORD 
4 712 135 903254 posse ° MOV my BET, Me. BIT F 
4984 7 13737 003252 003254 MOV P1.BIT,PR.BIT 
485 Bs oes a ;GET NEXT BIT 
1380 7 003252 L 1.BIT 
4990 740 000001 003252 34s: MOV #1,P1.B1T 


0127 
1932 rae ee 036300 358: JRF oR BC, ;WRTBIT ;SIMULATE BIT 
4 4 Ol 000032 003174 MOV RKECPT(R2),T. ECPT pSTORE ECC 


WORD 
4994 Gex? 37 003234 003174 CMP a sECPT, T.ECPT s CHECK ECG TRAE TERN CORRECT 
4995 7 1401 BEQ v4 

4996 Geu77e 104134 ERROR 134 FEC’ “ait rN N HOT ZERO 

4997 024774 005237 003262 378: INC BY TCNT : INCRE N 

4898 Oes5000 0605300 DEC RO : CHECK me FPAISMED WITH WORD 


CZR60B0 RK611 OSKLS CTRL PRT4 
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nett 
Sseite Glsres ORE SRE 
003254 
Dae: 
142 
ide 000001 003254 
154 00 739 037026 
ie Sieve Boaaes 
1 12304 
aseize 12700 0 
$176 013737 003254 003256 
OBeS2e04% 006004 


= Whe MM OC ORC ORC HOC Oe We Me Me Me We 


1S: 


SS: 


12$: 
15$: 


O2-DEC-77 10:20 
ECC INITIALIZATION 


Bee 


PAGE 94 


re FORE TF PYRISHED WITH TEST 
;NO, CONTI 


5 a ee ce Oe 
; ATES ECC GE (PART 1) 


NERATION 


BUFF e"EoATROCL ERIN btReNGS Yc nSBE.” reGDe REA re 


OF 12 WORDS 


Sg ARE tet lide Ruat oft eRH™ 


FOLLOWING 81% HO WORDS OF OF DA 


40040 


020004 
000064 
HO00000 
HO0000 


CLOCK ANOAMER BEZ,TSBAUIRUMYY BOE BAF RLRAORERRPER, °° 


= HE HE EH HE HE HEHE EE HE HE EE EE HE RRR E ERA RE ERR AR EERE 


+4tue: 


SUES (Blo Ref TEBR™S 


#CCLR_RKCSI(R2) ;CLEAR RK611 


) RK611 DIAGNOSTIC MODE 
sees KBR RSD PUT cea ate 
ABARRME RE) coi MORPSOUNTETEE 9 
#10. #37. ,RO SUE ERO FOR UGH 6LBCKS UNTIL 
28r6, Ra RKMRI CRE) 

RKMRI (Re) 
tee MSP, RKMR1(R2) ;SIMULATE SECTOR PULSE 
pRKMRL (Re) 
;GENERATE SYNCH 
te Bn 
#255. RO 
PC, RDBI 
RO ;CHECK IF SYNCH FINISHED 
#1,PR.BIT ;SIMULATE SYNCH BIT 
PC; RDBIT 
#3-R1 ; SIMULATE HEADER 
#HEAD1,R3 CYL 0, TRK O SECTOR 0 
(R3)+,R4 GET NEXT HEADER W 
#16. RO :LOAD BITS PER ORD. 
PR.BIT,M1.BIT ;STORE PREVIOUS BIT 
RY :GET NEXT BIT 


CZR60B80 RK611 
CZR608.P11 


Seen 


2 


SaAgaesSSSBIESES 


33 


WUT UU Tu 
ep ee be be be ee tee be 
QRRLSRH SSB 


-0O0 
owow 





OSKLS CTRL PRT4 
0:00 
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0032S4 


003256 
001310 
003224 
0032Se 
001310 
003260 
003256 
003254 


003252 


003174 
003174 


— 
On 
AW 


20$: 


ess: 


30S: 


328: 


SYS: 
35$: 


oO m 
oa 8 


Sontacus * 


ae 
DB 


DEC 


8 
os 
By By 


E08 


10:20 PAGE 95 
TION (PART 1) SEO GOS 
g 
.BIT 
18$ 
#1,PR.81T 
PC’ RDBIT ;SIMULATE NEXT BIT 
RO ‘CHECK IF READY FOR NEXT HEADER WORD 
15S :NO, CONTINUE 
Ri :CHECK IF FINISHED WITH HEADER 
123 :NO, CONTINUE 
865. RO oe ‘SIMULATE GAP +1 FOR SWITCH FORM READ TO WRITE 
PR.BIT’ 
PC, ROBIT 
RO ;CHECK IF _GAP FINISHED 
eos RO iN OAD COUNT-EOR SYNCH FIELD 
Hires Mid 4 E 
pi BIT’ : INITIALIZE BITS 
Ru: BIT 
BTfoNt ,INITIOLIZE BIT COUNT 
#OMD'ECCW!MEWD!WRTGAT.E.MRI ;SET EXPECTED MRI 
PC,WRTBIT sWRITE BIT 
2 *DATA INCORRECT 
BITCNT : INCREMENT BIT COUNT 
" jCHECK IF FINISHED 
#1, P1.B17 ; SIMULATE OTIC BIT 
’ 
BITcNT ; CLEAR BIT COUNT 
#—£M328, EMW iL ERROR MESSAGE 
ECCHI : INITIALIZE ECC 
wECCe, RS sb START OF DATA 
(R3)+,R4 :GET NEXT BI 
nieet{ne.grr SAaPrearfsr® “OPO 
PR:BIT;M1.B81T ° 
P1.BIT,PR.BIT 


s WUWD 
— Veco 
i) 
Oo 
mS 
4 


;GET NEXT BIT 


,P1.BIT 
PC, WRTBIT ;SIMULATE BIT 
RKECPT(R2),T.ECPT ;STORE ECC WORD 

PC ECCGEN ;GENERATE EXPECTED ECC PAT 
E.ECPT,T.ECPT CHECK ECC PATTERN CORRECT 
375 :YES, CONTI 

135 ?ECC PATTERN INCORRECT 


FOS 


C RK611 OSKLS CTRL PRTY MACY11 30(1046) O2-DEC-77 10:20 PAGE 36 SEG 0096 
CZR60B8.P11 Oe-DEC-77 10:00 T4e ECC GENERATION (PART 1) 

i 3262 37$: TCNT ; INCRE IT COUNT 

ig p5ee5q Boe300 45 bre Ro ; CHECK pT FINISHED WITH WORD 

19 O3se99 002301 Bec eck aE Pi 

14 5. 1 C 1 ;CHECK IF FINISHED WITH TEST 

i? $32 1331 BNE 30$ 3NO, CONTINUE 

15 1 he eaten gS ce plaaaagaaaaeaa aati: 

18 ST 43 ECC GENERATION (PART 2) 


Be 


gu AR THE aot Te 1 AN ad ot A aioe! POLLED ett 


." TIC MODE. ISSUE A WRITE 
aa 


rT 


IN 26 SECTOR 


Wr 


CTOR 0. CLOCK THROUGH 


PP bb be he be ee ee 


FUE WH ODD VEU Li ODO NU EC Dw VOL OID 


fe K beh ReSshtes. SIMULATE A SECTOR PULSE 
BND A G09 CLOCK THROUGH ONLY THE FOLLOWING 

177777 

177777 

177777 

177777 

177777 

177777 


CLOCK IN EACH BIT INDIVIDUALLY AND CHECK FOR OOTER. Ecc 
GENERATION AS SEEN THROUGH THE ECC PATTERN REGISTER 


a ee ee 


See Oe OF Oe ee ee ee Oe ee es Ot we OF es OF Oe Oe ee ee ee 


ascites ati ttle iaditeatintinaid 


SVU VU VOTTSUTTTTTTTTTTTT T TTT T T TTTT UT UTUTTUTUT UTD 


1 
1 

1 

1 

1 

1 

1 

1 

1 

1 

1 

1 

1 

1 025534 900004 téTu3: 

i B36 127 7 90001 001200 MOV Saket MES (Bo! ot ITERATIONS 

1 5 1 MOV #CCLR;RKCS1(R2) 

1 eee 127 40 ene MOV RKMRI1 (Re) CLEAR RKELI at DIAGNOSTIC MODE 
1 4 Ol 000004 MO weCcS RKBA(Re) 3L CC DATA 

1 1 1 2 MOV 8-12, RKWC(R2) : =12 

1 1 go00e3 0 MOV SWRDATA,RKCS1(R2) ; ISSUE WRITE DAT 

1 1 MOV #10. #37: ,RO ; ISSUE ENOUGH EL bcKS UNTIL 
1 : READY FOR SECTOR PULSE 
1 1 40 oo002e6 1S: MOV #OMD! MCLK, RKMR1(R2) 

1 0040 o0002c6 MOV #DMD, RKMRI (Re) 

me 

1 oo0026 MOV #DMD!MSP,RKMRI(R2) ;SIMULATE SECTOR PULSE 
1 000026 MOV #OMD. RKMRI (Re) 

1 003254 CLR PR. Bir :GENERATE SYNCH 

1 003256 CLR 1,B1T 

126 nets 5s Bo a26s RO 

138 DEC RO" ;CHECK IF SYNCH FINISHED 
161 01 003254 MOV #1,PR.B1T . ;SIMULATE SYNCH BIT 

162 37026 JSR PC’ RDBI 

ig peaae4 a prCYL HRkeO” SECTOR O 
165 12$: MOV (R3)+,R4 :GET NEXT HEADER WORD 

166 000020 MOV #16. ,RO :LOAD BITS PER WORD 





GO8 


gerepeo RK611 pax coe spp MACYLI1 — O2-DEC-77_ 10:20 PAGE 97 SES 0097 





¢ OOO CERATION (PART 2) 
5167 7 13737 003254 003256 ISS: MOV PR.BIT,MI.BIT  ;STORE PREVIOUS BIT 
ie3 g ROR :GET NEXT BIT 
1 7 0032S4 cL ba BIT 
133 
51f3 onaesy 12 BLASS simone nee 
215d ‘ bec 9 SAE eK if REMBY EO OR NEXT HEADER WORD 
176 BNE 1Ss :NO, CONTINUE 
1 DE Ri :CHECK IF FINISHED WITH HEADER 
178 12$ :NO, CONTINUE 
196 seems tute mov BGS. RO ant :SIMULATE GAP +1 FOR SWITCH FORM READ TO WRITE 
181 ° CLR PR.BIT’ 
51 ISR PC, ROBIT 
at Be bs Roel ane FINISHED 
corso RY Sewex"wy ESRB Ey FOR SHEN FELD 
51 cLR pi-BIT : INITIALIZE BITS 
1 CLR M1.BIT 
1 CLR ne. B1T 
191 CLR BITCNT INITIALIZE BIT COUNT 
13¢ 003224 MOV BOND !ECCH! MEMO! WRTGAT E.MR1 ;SET EXPECTED MR1 
184 — ie Ye 
5195 INC BITCNT : INCREMENT BIT COUNT 
1% Be Bes ol rater 
2138 003252 nov #1, Pi. B17 :SIMULATE SYNCH BIT 
2E00 ERROR 2 
i CLR BITCNT Ch, LEAR BIT COUN 
2 001310 MOV #EM328, EMW OAD ERROR OecAcE 
cLR ECCHI NITIALIZE ECC 
25ue Moy oSECRT 9 Sount OAT 
2508 30S: MOV (R3)+,R4 :GET NEXT BIT 
5208 MOV #16. ,RO :LOAD BITS PER WORD 
5209 2 003260 32S: MOV M1.B1T,M2.BIT  ;SHIFT BITS 
10 003256 MOV PR. BIT,M1.BIT 
if 003254 MOV P1.BIT/PR.BIT 
1 ROR RY ;GET NEXT BIT 
pels 174 1034 BCS 34S 
14 O00 003252 CLR P1.BIT 
Bsie BR 35$ 
5217 012737 oO00001 o03252 34S: MOV #1,P1.BIT 
2ei8 Ig : 47 7 036300 355: JSR BC, WRTBIT ;SIMULATE BIT 
See0 Oebe 016237 000032 003174 MOV RKECET (Re), T-ECPT ;STORE ECC WORD 
Sec Oe62e26 004737 036132 JSR PC. ECCGEN ENERATE EXPECTED ECC PAT 
Seece Oebese 023737 003234 003174 CMP E.ECPT,T.ECPT :CHECK ECC PATTERN CORRECT 
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003262 


Barbee 
ba8303 
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001200 
oooo00 
witty 
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oo0d26 
000026 


003254 


003256 


HOS 
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ECC GENERATION (PART 2) 


SEQ 0098 


37 Y T 
BE goR $38 tee. PATTERN INCORRECT 
37S: INC BITCNT ; INCRE NT GIT COUNT 
R j CHECK F ISHED WITH WORD 
DEC Ri 3 CHECK IF FINISHED WITH TEST 
BNE 308 :NO, CONTINUE 
g « KEKRKKRAKASKSSKRRERERARRARAAARRARERERARARKRAARRRRERARRREAARKRRARKRHLHHL AE 
;AT 44 ECC WRITING 
tx AR T R WITH A T CLEAR 
; Tt eae, In DT RxOe fn ce SEU Ayr Bs 
i# CYL IND wee oo H Ah sifu oh Loe Thoucn’ Seek vSEEK 
: OCK RDS 
if BS Le Soh he SP He 8 Phone 
1 i WRITTEN PROPERLY. CHECK BUS ADDRESS, 
i WORD COUNT, CYLINDER, TRACK, AND SECTOR. 
H REKAAKEKRAKAAAKAKRERSKERRRARRAAERARRARRARRARRRRRRRRARRARAA KARR RAAKRAAE 
+éTGq: SCOPE 
MOV #10. ,STIMES ;;00 10. ITERATIONS 
MOV SBASE , R2 LOAD RK611 BASE 
MOV #CCLR RKCS1 (Re) ict AR RK6b1 
MOV ¢ RKMR1 (Re) T aKed2 IN are MODE 
Sy A uid 
MOV SWRDATA, RKCS1 (Re) SSCE WAL 
MOV #66. #37. ,RO ; ISSUE ENOUGH TE, Dara UNTIL 
: READY FOR SECTOR PULSE 
1S: MOV 'MCLK, RKMR1(R2) 
MOV 5 ,RKMRI (Re) 
MOV RE RKMRI(R2) ;SIMULATE SECTOR PULSE 
#OMD, RKMR1 (RE) 
CLR PR.BIT 
CLR Blea! 
S$: moe oat? 
DEC ;CHECK IF SYNCH FINISHED 
MOV Hs bef ;SIMULATE SYNCH 
J R P ROB 
MOV Ape iLOe® WORDS. PER HEADER 
10S: mov i Rs i NE ORD 
12S: MOV BAe Bt Tom. BIT Me Ree be Sus BIT 
ROR R4 
BCS 1S$ 
CLR PR.BIT 
R 16$ 


ERebe-Pii~ | be-bec=77 10:00 
S279 








>. OOOH HOW HS HHNDwDoDnwonmwmonom 
alee On ' 


ait 


2303 

1 

e312 

231 16 

$314 

tt ts 

e317 03254 
16 D03eS2 
19 

u 003252 

32 

S324 erg 
7 132 

538 tata 

Ss 003234 

2337 

pane 003262 

S33 000002 

5334 





MACYI1 ALO) 


003254 


003256 


001310 


003224 


003252 


001310 


003260 
003256 
0032eS4 


003252 


003174 
003174 


15$: 
16$: 


20S: 


ess: 


30S: 
32S: 


34S: 
35S: 


378: 


SoRranse 


DBMODD 


CLR 


-77 10:20 PAGE 99 
TING 
#1,PR.BIT 
PC’ RDBIT -SIMULATE NEXT BIT 
Ro jCHECK IF READY FOR NEXT WORD 
Ai tCHECK IF FINISHED WITH HEADER 
10$ - :NO, CONTINUE 
pe 61T,M1 BIT  ;SIMULATE GAP 
*“ROBIT 
RO’ . ;CHECK IF GAP FINISHED 
20S :NO, CONTINUE 
P1.BIT : INITIALIZE BITS FOR SYNCH 
M1.81T 
Me. BIT 
errant’ oe ER TOE BIT COUNT 
phe R ie SYNCH COUNT AND WRITE SYNCH 
5rD{ECcu: MEWOIUATCAT E MRI ;SET EXPECTE 
’ 
TCNT : CLEAR COUN 
— } CHECK ita SYNCH FINISHED 
$ NO, CONTINUE 
81,61.81T !WRITE SYNCH BIT 
’ 
Eccut ; INITIALIZE ECC GENERATOR 
M EMW sLOAD ERROR MESSAGE 
Bireny | GINETTALIZE BIT COUNT, 
#ECCBUF RS ; LOAD RODRESS OF BUFFER 
te RO OO MET TS PER WORD 
mi. BtT, Me. BIT :SHIFT BITS 
"BIT, PR.BIT 
a a ;DETERMINE NEXT BIT 
21 BIT 
35$ 
#1,P1.B1T 
PC, WRTBIT ;WRITE NEXT BIT 
PC, ECCGEN - GENERATE ECC 
RKECPT(R2),.T.ECPt ;GET PATTERN 
PET I eeet ;CHECK ECC PATTERN CORRECT 
37$ :YES, CONTINUE 
135 ?ECC PATTERN INCORRECT 
este NC REN art te THE LAST BIT OF 
25¢ : THE LAST DATA WORD, ECCW MUST BE RESET 


SEQ 0099 


c RK611 OSKLS CTRL PRTY 
&SRepe-Pit ba<bec<7? 10:00 


are ee Teter cite 


Rees 


_ 


Ww 
ne 


WUT 
BI 


@ 


w 
WwW 


MUU 
sDedeDeaen iD ceo 
Bow Non Lu 


JO8 





MACY11 30(1046) O2-DEC-77 10:20 PAGE 100 
T44 ECC WRITING 
CNP gl Ri jIN THE EXPECTED MR1 TC INDICATE ECC 
003224 prc #ECCW,E.MRI : 
28s: Dic RO ;CHECK IF THROUGH WITH WORD 
BNE :NO, CONTI 
DEC Ri j CHECK IF A END OF SECTOR 
001310 nov #EM333, EMW HTOAD ERROR RessAGe 
CLR BITCNT ; INI TAL IZE BIT COUNT 
MOV ai *LOAD R ECO WORDS 
MOV #ECCHI,R3 :LOAD ADDRESS OF ECC 
40$: MOV CRS) + BM i GET NEXT ECC WORD 
003260 42s: NOY mi .BtT, Me. BIT Ser bits ov 
003256 MOV PR.BIT,M1.B1T 
003254 MOV P1.B1T,PR.BIT 
ROR Re ;DETERMINE NEXT BIT 
CLR P1.BIT 
BR 45$ 
003252 44S: MOV #1,P1.BIT 
455: JSR on PC’ WRIBIT ;WRITE NEXT BIT 
INC SITCNT ; INCREMENT BIT COUNT 
CMP #2, RO tIF THE LAST BIT OF THE LAST ECC WORD 
BNE 46$ :TS BEING WRITTEN, ECCW MUST BE SET 
CMP #1 ,R1 IN EXPECTED MR1 to INDICATE ECC 
003224 BIS #ECCW,E.MR1 y sete 
46S: DEC RO ;CHECK IF THROUGH WITH WORD 
BNE 425 ;NO CONTINUE 
DEC Rie ;CHECK IF NISH WITH ECC 
001310 MOV #EM334, EMU :LOAD ERROR FESSAGE 
abe Bre RO OR eat AMSLE BIT COUNT 
003260 47S: MOV mi.BtT, Me. BIT SEATPT BIT 
003256 MOV PR.BIT,M1.BIT 
003254 MOV P1.81T,PR.BIT 
CLR P1.BIT 
JSR on BC, WRTBIT ;WRITE NEXT BIT 
INC BITCNT ; INCREMENT BIT COUNT 
DEC RO. ;CHECK IF THROUGH WITH POSTAMBLE 
coouee sos: FY Bagi REL mom chdS visste eeode BOCSEE™® COmPMO 
000026 ; MOV #0MD, RKMRI (Re) . 
DEC RO 
BNE Sos 
3140 MOV RKCS1(R2),T.CS1 ;SAVE CS1 
03150 MOV RKCS2(Re)'T.CSe ;SAVE CSe 
003154 MOV RKER(R2),+t.ER  ;SAVE ERROR REG 
003200 MOV #RDY! WROATA&<tC<60>>,.E£.CS1 ;LOAD EXPECTED CS1 
003210 MOV #IR,E.CS2 ;LOAD EXPECTED cS2 


SEQ 0100 


6 SA PA nt ets eaten 


CZR60B0 RK611 OSK Bl PRTY MACY11 30(1046) O2-DEC-77 10:20 PAGE 101 SEQ 0101 
CZ2R608.P11 0e 77 10:00 T44 ECC WRITING 





CLR E.ER sLOAD EXPECTED ERROR REG. 
MOV RK (R2),T.0CvL_ ; C INDER ADOR REG 
MOV RKDA( Re), T- ; BAD G 
OY 0OCORMERCRS Te RO UNT. 
° ’ 
CLR E.OcYL ” + PORD EXPECTED C CYLINDER AND REG. 
MOV #1,£.0A *LOAD EXPECTED D 
MOV sECCBUF +<400%2> , E. BA RPEG 
CLR WC LOB ExpecTED ECC ERIORD 
4 CMP .€51,7.CS1 i CHECK CSI 
4 BEQ 5 
EPROR a4 
4 sss: chr .CS2,T.cS2 ;CHECK CS2 
be | ERROR et 
4 S6S: CMP .ER,T.ER ;CHECK ERROR REG 
407 BEQ 57§ 
408 ERROR 46 
4 57S: CMP .BA,T.BA ;CHECK BUS ADD 
4 BEQ 8s 
4 ERROR 14 
Ey 58s: CMP E.WC,T.WC ;CHECK WORD COUNT 
o4 BEQ Sos 
4 ERROR 15 
s4 59s: CMP E.DCYL,T.OCYL ;CHECK CYLINDER ADD 
54 BEQ 60$ 
54 ERROR Sl 
ad 60S: CMP .DA,T.0A ;CHECK DISK ADDR. 
4 BEQ STys :;YES, GO ON TO NEXT TEST 
pied ERROR 152 
puge .SBTTL PARTIAL WRITE DATA 
S424 g ee ee i 
Bee ; ATE ZERO FILL ON WRITE DATA 
5427 is CLEAR T oft TROLLER WITH A CONTROLLER CLEAR. 
5428 2 put Be N DIAGNOSTIC MODE . ISSUE A WRITE 
5429 $i igs. N 26 SECTOR F T 
5430 2 sie RO, HE netsh ECTOR CLOCK THR SEEK 
5431 i AND DRIVE CLEAR E A SECTOR PULSE 
5432 $i Tie Sus eee HORDS: Ses AO a Seb WORDS AND 
5433 ti THE TWO ECC Eck THE SECTOR F FOR ZERO FILL 
5434 1 a AND MAKE HE” THO ee WRITTEN PROPERLY 
B36 is CHECK BUS SBBDRESS, COUNT, CYLINDER, TRACK SECTOR. 
S437 LEMIRE LAE LLL ELLOS ECL LION IE 
5438 027516 oO0004 gene : SCOPE 
438 027520 012737 oo00012 001200 MOV #10.,STIMES ;;D0 10. ITERATIONS 
5441 027526 013702 001270 MOV SBASE , Re sLOAD RK611 BASE 
544 7532 B1z7bs MOV SCCLR/RKCS1(R2) :CLEAR RK611 
44 7540 12768 000040 o00026 MOV WOMD,AKMRI(R2)_ ;PUT RK6L1 IN DIAGNOSTIC MODE 
4 027546 Ole762 O56216 O00004 MOV #ECCBUF, RKBA(R2)’ ;LOAD ADDRESS 
54 027554 Ole762 177675 o00002 MOV #-103, RKWC(R2) ;WORD COUNT=400 
S446 027562 Ole7be 000023 o00000 MOV *uROATA, RKCS1(R2) ;ISSUE WRITE DATA 


Cc RK611 eK CTRL PRTY MACYI1 (1046) _02-DEC-77_ 10:20 pave 102 
ones i seo 0102 





$502 030076 005037 003270 CLR ECCLO 


02-DEC-77 10:00 ZERO FILL ON WRITE DATA 
44? 027570 MOV #66. #37. ,RO s ISSUE ENOUGH CLOCK KS pUNTIL 
4 027574 oo0026 1S: MOV #OMD! MCLK RKNRL (R2) 
000026 MOV ,RKMRI (RE) 
wb rel Be 
4 4 MOV #OMG!MSP,RKMRI(R2) ;SIMULATE SECTOR PULSE 
: 4 Berbos ae MOV is RKMR1 (Re) P 
45S CLR -BIT 
| 456 CLR m1 .BIT 
SS: JSR PC, RDBI 
R ;CHECK IF SYNCH FINISHED 
| i 003254 MOV #1,PR.BIT ;SIMULATE SYNCH 
JSR PC RDBIT 
MOV #HEAD1, R3 ;LOAD HEADER 
MOV #3,Ri ;LOAD WORDS PER HEADER 
| Bue5 De7676 108: v (R34 RY xT 
V #16. ,R0 3L ITs 
7 003256 12S: MOV PR.BIT,M1.BIT pC Me: PREV YIQUS BIT 
a ROR RY 
| 3 BCS 1S$ 
e470 ge7716 005037 cLR PR.BIT 
a 
47 003254 15$: Vv #1,PR.BIT 
| 3 855784 BAGS icra 123: JSR BA Rbatt ;SIMULATE NEXT BIT 
| §47S 0277 DEC RO :CHECK IF READY FOR NEXT WORD 
ed Oe i BNE Les ?NO, CONTINUE 
4 774 1 DEC I :CHECK IF FINISHED WITH HEADER 
54 4 BNE 10$ :NO, CONTINUE 
ey 7 i 101 MOV #65. 
4 137 254 003256 20S: MOV PR. atte M1.BIT  ;SIMULATE GAP 
548 77 003254 CLR 
| 4 4 037026 JSR PC, eBbart 
SY DEC ;CHECK IF GAP FINISHED 
eu BNE 30s :NO, CONTINUE 
4 7774 003252 CL 1.BIT :INITIALIZE BITS FOR SYNCH 
S86 3254 cLR PR. BIT 
488 10 CLR me: Bt 
sis amos Bt goose errenr™ —FHRRPLEREDE TCS 
n Bisvbo Bo0g05 oe Bae NT an i TR TOC ACH BOUNT AND WRITE SYNCH 
SY 27. Ogeo40 003224 MOV ee te LECCu#MEWD! 1wRTGAT, E.MR1 ;SET EXPECTED MRI 
4 7 2ss: JSR on 
S495 37 003262 INC SITCNT ;CLEAR BIT COUN 
4 DEC R * CHECK IF SYNCH TE INISHED 
4 4 3 ia BNE 25S *NO, CONTINUE 
4 1 000001 003252 MOV #1,P1.81T :WRITE SYNCH BIT 
599 030064 004732 036300 JSR PC; WRTBIT 
5501 p3pb55 5037 003266 CLR CCHI ; INITIALIZE ECC GENERATOR 


CZR6DB0 RK611 OSKLS CTRL PRTY 


CZR60B.P11 02-DEC-77 10:00 
BG Ie Ree pes 


aaa aratgty Gt 
Pee 
ONOUL wre 


cee 


2 i 

cru aktet: 

sea Saterg 

5539 030276 012737 051307 


Se 
alam 


eo tise flee Biss 
5548 030350 O06004 

5S493 10 
BG abe om 
Ee Gee Geren QiRsie 
5SS8 B30406 001006 





MACY11 30( 1046) 
T4s 


001310 


001310 


D03260 


Boase4 


4s 


003252 


30$: 


34S: 
3S$: 


378: 
28S: 


39$: 


4O$: 
42S: 


44S: 
4S: 


02-DEC-77 


ZERO 


10:20 PAGE 103 
FILL ON WRITE DATA 


#E ,E LOAD ERROR MESSAGE 
BITCNT S INITIALIZE BIT COUNT 
Hie ee {-R8R WERRS CER. SECTOR, 
(R3)+,R4 ;GET NEXT WORD uae 
B16, ROL ort ai at bi fs 
pi stripe eit 
Ra ts ;DETERMINE NEXT BIT 
Fi ,817 
#1,P1.B8I1T 

,WRTBIT ;WRITE NEXT BIT 


cet :Get_ pat feRN 


5 CHECK ECS RAL TERN CORRECT 


cnr fea eae 
i RO a TH NEX Tart te IS THE LAST BIT _OF 

§ T DATA WORD, ECCW MUST BE RESET 
#1,R1 HE EXPECTED MRI TO INDICATE ECC 

2 ORL: 
#ECCW,E.MRI 
RO ;CHECK IF THROUGH WITH WORD 
CONTI 

ar CHECK IF AT END OF SECTOR 


YES -SK 
Befcaur+< 10392» AG. 3 Belt F103 WORDS TRANSFERED 


Ne Ene EGR ZEROS on 


BITCNT ‘TN reSSAGE 
#2,R1 3L ERO WORDS 
#ECCHI,R3 is 8 Ss OF ECC 
(R3)+,R4 WOR! 
#16. RO ; LOAD Bits SER WORD 
M T,M2.81T  ;SHIFT BITS 
PR. TM. BIT 
P1.B1T,PR.BIT 
RY ;DETERMINE NEXT BIT 
44s 
fi .81T 
4o$ 
#1,P1.B1T 
PC; WRTBIT ;WRITE NEXT BIT 
Br tent ; INCREMENT BIT COUNT 
R LIF THe LAST 8 I OF THE LAST ECC WORD 
46$ :IS BEING BRIT ten’ ECCW MUST BE SET 


SEQ 0103 


an 
3 


CUTOUT UU TOT 
Vea zZan= 


WUT UN UNUTUu 


yn 


pepabataty 
BOVEU 


Benne 


; 


eee 
twrue-o 






Cc RK611 CTRL PRTY MACY11 30(1046) O2-DEC-77 10:20 PAGE 104 SEQ 4 
ESE Oe ere! Bacbecss> 10-00 S9GEOMe PRO FILL ON RITE DATA os 
CMP #1,R1 ;IN EXPECTED MR1 TO INDICATE ECC | 
BNE 4 :WRITING IS DONE 
003224 BIS CCW,E.MRI 
46S: DEC RO ;CHECK IF THROUGH WITH WORD 
BNE 42S ;NO, CONTINUE | 
DEC RI :CHECK IF FINISH WITH ECC 
NE 4 >NO CONTINUE 
001310 MOV #—M334, EM *LOAD ERROR MESSAGE 
CLR BITCNT :CLEAR BIT COUNT 
MOV #15. ,RO ; LOAD POSTAMBLE BIT COUNT 
003260 47S: MOV M1.61T,M2.B81T SHIFT BIT 
003256 MOV PR.BIT,M1.BIT 
003254 MOV P1.BIT,PR.BIT 
CLR P1.BIT 
ISR PC, WRTBIT ;WRITE NEXT BIT 
ERROR 2 
INC BITCNT ; INCREMENT BIT COUNT 
DEC RO :CHECK IF THROUGH WITH POSTAMBLE 
BNE 475 :NO, CONTINUE 
14: MOV #34 RO j 1SSUE CLOCKS TO COMPLETE COMMAND 
4. O oo0026 SOS: MOV MO!MCLK,RKMRI(R2) ; ISSUE CLOCK PULSES 
bE 0 oo00026 MOV #DMD, RKMRI (Re) 
i DEC RO. 
5 01 14 eG 6=Ss«BKESA(R2),T.CS1 ;SAVE CS 
oe Ss +4 
1 ae 1S MOV RKeeS }+ TGs i OVE &33 
14 003154 MOV RKER(R2).1t.ER  ;SAVE ERROR REG 
ee 903200 MOV #ROY!WROATAS<*C<60>>,E.CS1 _;LOAD EXPECTED CS1 
! i0 MOV #IR,E.CS2 3L be cred cse 
‘ 14 CLR E.ER zL CTED ERROR REG. 
1é ‘ 003160 MOV RKDCYL(R2),T.DCYL  ;SAVE CYLINDER ADOR REG 
4g 1 3146 MOV RKDA(R2),1.DA s38 DISK AND REG 
i 3144 MOV RKBA(R2);T.BA ;5A ADD REG 
1 003142 MOV Re)’T.WC SAVE WORD COUN : 
34 003220 CLR E.DCYL + POND EXPECTED CYLINDER AND REG. 
40 012737 000001 003206 MOV #1,£.0A *LOAD EXPECTED DISK 
0646 012737 OS642e4 003204 MOV #ECCBUF+<103%2>,£.BA ;LOAD EXPECT 
0654 ft) 003202 CLR E. ;LOAD EXPECTED ECC WORD 
023737 003200 003140 CMP E.CS1,T.CS1 *CHECK CSI 
1401 BEQ 55$ 
0 29 154 ERROR 154 
7 3/37 003210 OO31S0 SSS: CHE E-cS2,T.cse ;CHECK CS2 
1 ied ERROR 155 
3737 003214 003154 SéS: CMP —.ER,T.ER ;CHECK ERROR REG 
030712 1401 BEQ S7$ 
714 156 ERROR 156 
748 1; 003204 003144 57S: Che E.8A,7.BA ;CHECK BUS ADD 
104157 ERROR 157 
930730 023737 003202 003142 SBS: che E WC, T.WC ;CHECK WORD COUNT 
B30558 i 4160 ERROR 160 
030742 023737 003220 003160 59S: CMP E.DCYL,T.DCYL ;CHECK CYLINDER ADD 
030750 001401 BEG 60$ 
030752 104161 ERROR 161 
| 
| 


C RK611 OSKLS CTRL PRTY 
Efpeoe.P1l b-DEC=77 10:00 


37. 003206 
1041 


4 
Bits 
764 


Peeps 

SoRes 
Be 
ae 


oo0001e 
1 001270 
08 Bt 
ial Bt 
seve Balose i ea 
) 7 
& bslove BIErE= biGnes 
seve Osidee Bisres Gouwd 
epee Boe 001370 
, 074 1 
Gees GBITG2 SLEPES SBRESS 
esse 091119 p0s037 ooazsy 
eres 120 12700 paseo 
S6s9 1 737 037026 
seco 31180 B0s00 
Seed GSLI@2 GLar SoeRRs 
eres 1 12703 35 
5670 164 013737 oO032S54 





MACYI1 eo re 3 


003146 608: 175 


.SBTTL ##18 BI 
ig 


, pewaeeeses 
m 


«<REREPSRE ER EKE 
téTue: SCOPE 


— Oo Oe es wees os ee es ee er ee 


001200 


7$: 


9S: JSR 


003254 


11$: 


003eS6 138: 


et! 


aePy a HO’ SERO' BITS ARE PRESENT FOR Paci 


-77 10: SES 0105S 


LL ON WRI 
a 
T FORMAT WRITES 


wh a at aanecetmemtennenmeeatesatn 
18 GIT WRITE DATA (PART 


BO9 
. PAGE 105 


;CHECK DISK POOR. 
i VEC GO ON TO NEXT TEST 


| SONTREGAER WPTHLG COUTTS SHE ara 
rues peek 2° 


i M6 06 9 SE A HSE 6 0 a a a a a a aa a 
#10.,STIMES ose 10. ITERATIONS 


»Re 
@CCLR, RKCS1(Re2) rer eAR R CONTROLLER 
2000, RO T 


. L COUNT 
R ;LOOP UNTIL COUNT 16 


sSEr AGNOSTIC MODE 
Load BUFFER ow 


#-400,, RK ; 
suRDATA! Cr MT locus coms : 
#66. #40.4+<4.43.42>,RO ;fSSUE 


; READY FOR SECTOR PULSE 
ge CLK cre (Re 


;SIMULATE SECTOR PULSE 


rope RKMR1(R2) 
RKMRi (Re) 
PR. BIT ;GENERATE SYNC 
M1.BIT 
#255. ,RO 
PC, ROBIT ;SIMULATE SYNC O BITS 
9$ 
#1,PR.BIT ;SIMULATE SYNC 1 BIT 
PC’ RDBIT 
#HEAD11,R3 ; SIMULATE_HEADER 
f ; CYL O TRK O, SEC O 
(R3)+,R4 :GET HEADE R 

RO :LOAD BITS PER WORD 


#16. 
PR.BIT,M1.B8I1T ;STORE PREVIOUS BIT 


c 


ee 
Ne 


SRERRIERERSRERREB RES tec 


BRS 


WUT 


Gene 


ee be bb be bb oe he ee 


SESE LC£ C£LLFLSEEC£ 


NING 
onvst 


OSB 


DOWWHE DUE Were 


NNNNNNN 
= bo an be be be fe Pe ee 
NOW EL WE 


NNNNNNNNN 


RPT 
Wtwre 


7 


CZR60B0 RK611 OSKLS CTRL PRTY 
ZR60B.P11 


02-DEC-77 10:00 


Bane htzs 


SOBGGOKOOGG Ooo = 


Pb Be bb bP be 


NERERE ERR PoE oe EN 


THOR LOOMS 


£ SW 


ore 


PS 


012737 
004737 





003252 


000001 
036300 
000032 
03613e 
003174 


MACY11 30(1046) 
T46 


003254 


003256 


001310 


003224 


003252 


001310 
003260 


003256 
0032S4 


003eS2 


003174 
003234 


1S$: 


16S: 


20s: 


2e$: 


24S: 


ess: 


27S: 
ees: 


cog 
18-BrF WRITE DATA (PART 15° 


ao ww 
o 
bot 
= 


° 
oo 
“ « 
+ 23 
rary 
oO 
~ 
4 


BIBBe-z_ ese Fyne 


ee 
~ 


a 
= 
mow 
rf peteperet th 


aia 
OD 


;GET NEXT BIT 
XT IT we 
= mrs ne Bit AOnIS WORD 
MEADE XT pe BoER WORD 
;SET C 
; SIMUL: MULATE "CAPs 


;SET COUNT FOR WRITE DATA SYNC 
; SAGE 


or 
° 
Ba 
m 
=F 
wo 
ma 
w 


T 
T 
#0MD E Cu! MEWO! WATEAT EDR Bry Cours F R EXPECTED MR1 
BC,uRTEIT CS TMULATE™ by Nios 
TCNT ;BUMP BIT C 
Bi . ? LOOP BATIC SYNC O WRITTEN 
a1,P1 B17 ;SIMULATE SYNC 1 
BC, WRT T 
Fee ; INITIALIZE ECC WORDS. 
TENT ;CLEAR BIT COUNT 
anioDee 1 vari cout DATA POINTER 
8355 RY’ ET RTA WORD 
#ENI8 EMM MES SSAGE (18 BIT DATA WRITE) 
M1.8tT,M2.8IT COA aft #5 
Pr ehPa eh 
a poe ;CLEAR CARRY & GET NEXT BIT 
278 
P1.BIT 
$ 
#1,P1.B1T 
PC’ WRTIBIT ;SIMULATE NEXT BIT 


e 
RKECPT(R2),T. ECPT 


PC, ECCGEN 
T.ECPT,E.ECPT 


:GET ECC PATTERN 
COMPUTE EXPECTED ECC 
i ERECK IF CORRECT 


SEQ 0106 


sw — OSKLS CTRL PRT4 
CZR60B .P 02-DEC-77 10:00 


001401 


ge 
B 


5728 104164 

eae ales posne 
sk 

53) B3ieie oooo02 

ene aie 
sk 

5735 031 

2532 Osiea2 o1e73? 051701 
5738 B3ieug Bagge 900° 
5740 031546 005301 

741 031550 001312 

742 

743 

744 

a 

bug 

748 

749 

750 

5751 

5752 

eres 

4 

755 

5756 
ere 
eres 1552 00004 

761 Baises 1273? ooon12 
5763 031562 005737 003274 
eres o1e8 001017 

7 i 012737 000001 
5767 031576 O0s227 177777 
$e IEE RIGHT wou 
5770 031610 O1374— O01220 

ooh B8iele ibyor o4yosi 
8773 O3ibee 000137 O32424 
5775 031 034102 
ese Oslese BodbdS 
5777 031634 057216 
5778 031636 005700 

S773 031640 1353 

5780 031642 013737 031650 
5782 031650 


MACY11 30( 1046) 
T46 


29S: 


001310 31S: 


32$: 


<A NN 


$8747 
001200 


001200 


64S: 
es: 


001110 
3$: 


O2-DEC-77 10:20 PAGE 107 

18 BIT WRITE DATA (PART 1) 

BEG ;YES - SKIP 
ERROR 


i 
a 


31ST 16 thy JUST DONE? 


xt BIT DONE 


Mov 36339 ,£ mH Pao tig 16.17) 
ms 52," ‘ ;GO bo i] * sem 

DEC ;ALL WORDS DONE? 

BNE Bis :NO - GET NEXT WORD 


= Se 06 Se SE 0 A ae aE aE a ab a 0 A a a a a a a a a aaa 
47 BIT (PART 2) 


WRITE DATA 


eure QNTROLLER 1h OEAGNOST IC MODE ai 
Ae aE Mea 
Bib ORive, CLeaR teSsaces, SIM ATE cei fits 
WI H BAD PARITY vse = VERIFY URITING OF WO PARIT 
BITS ON SIMULATED DISK 
NOTE: THIS TEST IS ONLY EXECUTED IF MEMORY 

PARITY E 


NABLE IS PRESENT FOR BUFFER 
OCATION. 


oS yg go a ret aaiacscne pan i niagacteetagtne re its ty to 


co 
MOV #10.,STIMES ;;00 10. ITERATIONS 


TST MEMPAR ;CHECK IF MEMORY PARITY AVAIL. 
BNE 2s :YES - SKIP 

MOV #1,STIMES ;FORCE INTERATION COUNT TO 1 

INC s-| jONLY DO ONCE ‘ 

Ye TBY1 iT Yee Pee? BYPA 

MOV STEStN. -(SP) ; SAVE STN FOR TYPEOUT 

TYPOC '?G0 TYPE--OCTAL ASCII(ALL DIGITS) 
TYP TSTBY2 

IMP tsTso ;GO TO NEXT TEST 

JSR R2, WRTPAR 

BADPAR 

TST RO 

BNE 1$ 

MOV 35, SLPERR 


SEQ 0107 


CZR6DB0 RK611 OSKLS CTRL PRTY 
CZR608. Oe-DEC-77 10:00 


Pil 


NN 


Bt 001270 
100000 


MUU UU 
NNNAN 


Beeseogaage 
GSS 88 GOSS SoSSS S8ocs 


NNN 
Nee Gs 2690 Sises Shere 


oOo oOODO000 
he he 
seaee g 
— 
rs: 
fu 


UW) 


79% 03 2762 O00440 

faq fairies Bless OOO 
2238 3 001370 

580 012762 000140 

eeue 83 012762 O00040 

5804 63 903254 

S80e tk 1 uaa 

5808 904737 037026 
001374 

012737 oo0001 

737 037026 


ret BSRENE 
gree ppRaee 


003254 


tome emwweD 
oOwow 
el ee ed ee ee oe ed ee ed 


OOD NOU £ Wore 


= b EL: 


Shiaueiss 


ooo001 
7 037026 


3] 73 

300 

301 
2e3 13? 9 000101 
2g 1 530 0032S4 
5833 112 037 003254 
5834 138 Reese 037026 

5835 1 300 

58 124 001367 
5837 O3ele6 Ole700 oo0400 
5838 O3e13e 012737 050670 


MACY11 ps 


000026 
000026 


003254 


003256 


003254 


003256 


001310 


SS: 


7$: 


9S: 


11$: 
13S: 


20$: 


EO 


1B BIT WRITE DATA PART 2)" 


MOV SBASE , Re 
MOV SCCLR,RKCSI(R2) 
nov % RO 

BNE S 

MOV #OMD, RKMR1(R2 
MOV #BADPAR, RKBA( 
MOV 8-400, RKWC (Re 


MOV sWwROATA!CFMT 
MOV #66. #40. 4<4, 


MOV oe ee 


BNE 7$ 


MOV #OMD! MSP, RKMR1 (Re) 


MOV #DMD, RKMR1(R2) 
IT 
IT 
,RO 
JSR PC,RDBIT 
RO 
BNE 95 


MOV #1,PR.BIT 
JSR PC} ROBIT 


MOV #HEADL I ,R3 
mov (R3)+ RY 
MOV PR-atT,M1.BIT 


BCS 15$ 
CLR PR.BIT 
BR 163% 


PR.B 
CLR M1.8 
MOV #255. 


MOV #1,PR.BIT 
JSR PC, ;RDBIT 


13S 
DEC Ri 
BNE 11S 
MOV tee. 
MOV PR. att M1. BIT 
CLR 
JSR PC, ROBIT 
DEC RO 
BNE 20$ 
MOV #256. 
MOV senso?" Bad 


+ 


RKMR1(R2) 
MOV #OMD, RKMRI (Re) 
DE RO 


SES 0108 


;LOAD RK611 BASE 
;CLEAR CONTROLLER 


; LOOP untit count oO” — 


eT po hoe SUFFER ADORE ADDRESS 
COUNT 


KOS} (RD & wee 


;ts NOUGH 
; READY FOR SECTOR PULSE 


;SIMULATE SECTOR PULSE 


;GENERATE SYNC 
;SIMULATE SYNC O BITS 


;SIMULATE SYNC 1 BIT 


Soe HEADER 
eve Re ro 0, SEC 0 


eal 


:GET NE 


HEADER WORD? 
BIT THIS WORD 


XT 
? 
XT SOE WORD 
OR GAP 


rex BIT 
NEXT 
NE 
INE ? 
NE 
F 


T COUNT 
MULATE GAP 


;SET COUNT FOR WRITE DATA SYNC 
:LOAD ERROR MESSAGE 


CZR6080 RK611 OSKLS cm PRT4 
Ge-DEC-77 10:00 


CZR608.P11 


pESMRPARAR Gatien ETEEE EEE 


ra 
=o 


bay Ab ayy 
widen teat d 
pS 
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T47 


003224 


003252 


001310 


003260 
003256 
0032S4 


003252 


003174 
003234 


001310 


FOS 


02- DEC=77 10:20 PAGE 109 
18 BIT WRITE DATA (PART 35 
CLR Pi. IT ;CLEAR BITS 
CLR "BIT 
CLR M1.BIT 
CLR Me. BI 
CLR BITCNT CLEAR BIT Cc OUNTER 
MOV ‘ECCWIMEWD'WRTGAT,E.MR1 <SET EXPECTED MRI 
228: JoR oe PC,WRTBIT ;SIMULATE SYNC O 
INC BITCNT ;BUMP BIT COUNT 
DEC ‘LOOP UNTIL SYNC O WRITTEN 
nov 1,P1.B81T ;SIMULATE SYNC 1 
JSR PC} WRTBIT 
ERROR : 
CLR CCHI ; INITIALIZE ECC WORDS. 
CLR ECCLO 
CLR Hii ; CLEAR BIT C 
MOV T bate POINTER 
MOV #. Ri *;SET paTark 
24s: MOV (R354 "GET D DA A WORD 
MOV M LOAD MESSAGE (18 BIT DATA WRITE) 
MOV 8. iL BITS PER WORD 
2ss: MOV M1.8tT,Me.BIT  ;SHIFT BITS 
MOV PR. T,M1. BIT 
MOV P1.BIT;PR.BIT 
CLC ;CLEAR CARRY 8& GET NEXT BIT 
ROR RY 
BCS 275 
CLR Pl. BIT 
BR 288 
275: MOV #1,P1.BIT 
28s: JSR PC? WRTBIT ;SIMULATE NEXT BIT 
MOV BKECPT(Re), ,T.ECPT ;GET ECC PATTERN 
JSR N ; COMPUTE EXPECTED ECC 
CMP TaECPTE. ECPT :CHECK IF CORRECT 
Q :YES - IP 
ROR fea 
29S: NC BITCNT 
DEC RO 
CMP RO, #2 ;1ST 16 BITS JUST DONE? 
BEQ 31$ :¥ 
TST RO SELSE TES IF WORD DONE 
BNE 253 NO - NEXT BIT 
BR 325 tELSE DO NEXT WORD 
31S: MOV #£M339, EMW ‘LOAD MESSAGE (BIT 16.17) 
MOV #2,R4 ’ ;SET UPPER BITS OF WORD 
BR 3&4 GO DO BITS 
32S: DEC Rl Abt WORDS DONE? 
BNE 24S NO - GET NEXT WORD 
+ KEKE KEE RRS AERRE RE EREEE AREER RRR ER KEL ERRRRARAA KK ELAA LALA RRA RH RAE 
IkTEST SO CLEAR BAD PARITY BUFFER 


SEQ 0109 


032450 
032e4Se 


5932 O3eSe2 


Ww 
W 


W000000 

DOVE 
: 
oe 


PEL 
vO 


032570 
032576 


032602 
5946 032606 


e483 O3eei6 
5950 032620 


QUIT UU UT uu 


wo 
Heo 


0e-DEC- 


7 
012700 


808380 


001374 


10:00 


renee, — OSKLS com PRTY 
CZR608.P11 


ooo001 


es 


000377 
037026 


GO9 


MACY11 iow) O2-DEC-77_ 10:20 PAGE 110 


001200 


001200 


oo0000 


" 6 
4 
000002 
000000 


oo0de6 
000026 


000026 
000026 


CLEAR BAD PARITY BUFFER 
2& 


te THE SOLE PURPOSE OF THIS TEST Is TO CLEAR BADPAR 
i BUFFER AND REMOVE THE BAD PARITY 
j {REAANARR RR EennnnNEEHHnnneEEHHnEEEEnneneEeeasneeeenseneeeeese® 
nov #1,STIMES ;;D0 1 ITERATION 
MOV AR, R1 
1S: MOV s-1, (R134 
BNE AS 
: ictus att an aA ea SSS 
; ATES 18 BIT WRITE DATA (PART 3) 
is CLEAR RK611 CONTROLLER WITH A CONTROLLER CLEAR. 
i PUT CONTROLLER IN DIAGNOSTIC MODE. TSSUE | 4 WRITE DATA 
ti i IROER Gy. 0 PeePoessseel™ af “EL OGKT THpQual SEEK 
;* DRIVE CLEAR S. SIMULATE A SECT ULSE 
1 AND A K THROUGH 400 18 ett HORDE 
ti AND THE 32 Seats EC. CPR try THAT THE ECC IS 
i WRITTEN CORRECTLY 
OLLIE LE LLL LOL LETT eG PEA AN EITM A 
tSTS1: SCOPE 
#10. ,STIMES ;;DO0 10. ITERATIONS 
MOV SBASE , R2 ;LOAD RK611_ BASE 
MOV aCCLR, RKCSI(R2) sCLEAR C NTROLLER 
MOV #2000; RO STALL COUNT 
S$: DEC RO ; LOOP uni. COUNT 
BNE S$ 
MOV 1(R2)_ ;SET DIAGNOSTIC 
MOV See AE Re RKBACR2)’ ;LOAD BUFFER “ADDRESS 
MOV #-400, RKWC (Re) --- 
nov a DataeCrnt  RKos1 (Ra) ISS f NO 
READY Ue Bie Ke PULSE 
7$: MOV #DMD! MCLK RKMRI (R2) 
MOV #OMD, RKMRI CR 
DEC RO 
BNE 7§ 
MOV #OMD!MSP,RKMRI(R2) ;SIMULATE SECTOR PULSE 
MOV #DMD, RKMR1 (R2) 
CLR PR.BIT ;GENERATE SYNC 
CLR M1.BIT 
MOV #255. ,RO 
9s: ISR PC,RDBIT ;SIMULATE SYNC O BITS 
DEC RO 
BNE 9S 


SES 0110 


CZR6DB0 RK611 OSKLS CTRL PRTY 
02-DEC-77 10:00 


CZR608. 


: 


se 


Re eae to 


O00 
Zan 


i eucrns Soe 


CUTOUT UT UU 0 UT TT 2 
A oe 
ae 


BERRIEN Bae C ERS Ia aa 


$939 


Pil 


838256 


: 


ROLoe 


oo 
WW 


Bb8533 
15707 


12304 





004737 


000 
Sete ata T 


83782 


MACY11 30( 1046) 


003254 


003256 


003254 


003256 


001310 


003224 


003252 


001310 


003260 
003256 
003254 


TS1 


20s: 


ees: 


24S: 


ess: 


O2-DEC-77 19:20 PAGE 111 
18 BIT WRITE DATA (PART 3) 


#1,PR.81T sSIMULATE SYNC 1 BIT 
We 6 Bas RoatTt ; 
v aHE 11,R3 SIMULATE R 
HOV HEA? orf bee Othe. ge SEC O 
MOV Cease RY 3 ‘ 
PA ett om ert ie i rate ? 
ROR Rae T NEXT B 
eta BR BIT 
166 
JSR pa’ Roart AT NEXT Pleoe 
bec RO’ :READY FoR Ne R WORD? 
BNE 13S - GET NENT "att AOE S WORD 
DEC Ri tHEADE ? 
BNE 11$ :NO - XT HEADER WORD 
MOV #65. ,RO :SET COUNT FOR GAP. 
MOV PR.BIT,M1.8I1T ;SIMULATE GAP 
CLR PR.BIT 
JSR PC, ROBIT 
DEC RO 
BNE 20S 
MOV #26 : RQ ;SET COUNT FOR WRITE DATA SYNC 
MOV #—EM32? , EMW ;LORD D ERROR MESSAGE 
CLR PI.BIT :CLEAR BITS 
CLR PR. BIT 
CLR M1.BIT 
CLR IT 
CLR BITCNT CLEAR BIT C OuNTER 
V BOMD' ECCW!MEWD!WATGAT.E.MRI  :SET EXPECTED MRI 
JSR PC, WRTBIT nS TMULAT TE SYNé O 
ERROR 
INC ITCNT ; BUM BIT COUNT 
DEC 0 LOOP UNTIL SYNC O WRITTEN 
BNE 228 
MOV #1,P1.BIT speasnt SYNC 1 
ISR PC’ WRTBIT 
ERROR 2 
CLR CCH ; INITIALIZE ECC WORDS. 
CLR CCL 
CLR ITCNT ;CLEAR BIT COUNT 
MOV #ECCBUF ,R3 :SET DATA POINTER 
MOV #eo5. Ri ; T ATA Cc 
MOV (R3)+°R4 T A WO 
MOV #£M338, EMW *LOAD MESSAGE (18 BIT DATA WRITE) 
MOV #18. RO i080 ,8 ITS PE WORD 
MOV M1.8tT,M2.B1T HIFT BI 
MOV PR.BIT’M1.B1T 
MOV P1.B1T;PR.BIT 
CLC ;CLEAR CARRY & GET NEXT BIT 
ROR RY 
BCS 275 


SES O111 


cenepee RK611 OSKLS CTRL PRTY MACYII | ee 02-DEC-7 SES 0112 


7.10: PAGE ile 
ZR6D0B.P 11 O2-DEC-77 10:00 18 BIT WRITE DATA (PART 3) 
003252 gLR eiaett 


Bee 







5010 999901 03252 27$: MOV 81,P1.8IT 
eth 036300 oo8: JR on Be; nAtBiT ;SIMULATE NEXT BIT 
i popngg csirs Fe REEEEESER TEP od Te RGREETEE cc 
1 1 003234 CMP T.gCPT,E.ECPT : CHECK IF CORRECT 
i PRROR 164 en sage 
1 C03262 29S: INC BITCNT 
oo0002 nied RO, #2 ;1ST 16 BITS JUST DONE? 
BEG 31$ :YES - SKIP 
TST RO ‘ELSE TEST IF WORD DONE 
Be t«‘é‘*DS tee BO NEXT HORD 
051701 001310 31S: MOV #EM339, EMW 48 MESSAGE (BIT 16.17) 
000000 MOV RY" ;SET UPPER BITS OF WORD 
BR $ ;GO BITS 
32S: DEC R1 ;ALL WORDS DONE? 
24s :NO - GET NEXT WORD 
187 051613 001310 MOV #ENS38, EMM i SET ERROR MESSAGE 
1 2 MOV #18. ,RO :SET git COUNT 
137 90 003260 34S: MOV M1.81T,M2e.81T  ;SHIFT BITS 
1 4 003256 MOV PR.BIT’M1.BIT 
13737 003252 003254 MOV P1.BIT;PR.BIT 
1 CLC ;CLEAR CARRY 
Bee | Ses teeip TEA ONE 
003252 cL P4817 *ELSE bE y NEXT BIT FOR ZERO 
2737 1 003252 36% MOV #1,P1.B1T ;SET NEXT BIT FOR 1 
008737 eset 378: JSR Be; WR felt : SIMULATE ett 
log 000032 003174 MOV RKECPT(R2),T.ECPT ;GET PATTERN 
7 036132 JSR GEN ; GENERATE ECC PATTERN 
3737 003174 003234 chp T.ECPT,E£.ECPT ; TES TE CORRECT 
104164 ERROR fea ‘ELSE REPORT 
bose 7 903262 39S: INC BITCNT : BUMP BIT COUNT 
2 002 CMP #2, RO !IF NEXT BIT IS THE LAST DATA BIT 
BNE 41$ ‘ECCW MUST BE RESET TO INDICATE 
020000 003224 ian BIC #ECCH, E.MRI ;ECC BEING WRITTEN 
gee700 ooo002 ch #2 ,RO ; TEST IE 187 16 BITS DONE 
005700 rst RO. :ELSE test IF WORD DONE 
04 BR 4S$ tELSE GO TO ECC PROCESSING 


JO9 







C RK611 OSKLS CTRL PRTY MACYI1 30( 1046) 02-DEC-77 10:20 PAGE 113 SEQ 0113 
CZR608.P11 02-DEC-77 10:00 Si 18 BIT WRITE DATA (PART 3) 
6063 17) 001310 42S: MOV 8€M339, EM :SET MES FOR BITS 16 AND 17 
ie — i ai ee 
5066 001310 4S$: Mov #393, EMM ;MES (ECC WRITE) 
606 CLR BITCN :CLEAR BIT COUNT 
core Roy Seceris™?—EOWO ERGs €O° HORDS 
43$: MOV (R3)+,R4 ; GET CC WORD 
7 MOV #16. RO :SET BI COUNT 
7 003260 44S: MOV M1.8tT,M2.BIT  :SHIFT BITS 
607 003256 MOV PR. BIT, M1. B11 
Bors 003254 MOV P1.B1T;PR.BIT 
bore ROR RY ;LOAD NEXT BIT 
60 CLR P1.BIT 
e078 BR 47§ 
003252 46S: MOV #1,P1.BIT 
6081 47§: JSR PC, WRTBIT ;SIMULATE NEXT BIT 
At ERE #2,RO ;IF THIS BIT IS THE LAST ECC BIT 
BNE 49$ ;ECCW MUST BE SET TO INDICATE 
cNe aii :ECC IS DONE 
003224 BI #ECCH E.MRI 
49$: IN BITCNt ;BUMP BIT COUNT 
3? DEC RO. j TEST IF AST BIT THIS WORD IS DONE 
bb9 DEC Ale j TEST TF GOTH WORDS WRITTEN 
001310 MOV #—£M334, EMW *LOAD MESSAGE (POSTAMBLE) 
4 soy IEC SEF Gace 
096 003260 SIS: MOV M1.B1T,M2.B81T SHIFT REST OF BITS 
609 003256 MOV PR:BIT, Mi.BIT 
6038 003254 MOV p1-BIT,PR.BIT 
CLR P1.BIT CLEAR NEXT BIT 
6100 JSR pC, WRTBIT ‘SIMULATE BIT 
be INC BITCNT ;BUMP BIT COUNT 
e104 OF e ae cao -TDOpe 
61 903234 MOV #1 E.ECPT *SET EXPECTED PATTERN 
61 000032 003174 MOV RKECPT(R2),T.ECPT <GET °611 PATTERN 
b107 003174 003234 chp T.ECPT, —.ECPT i TES _TE EQUAL 
6109 033670 104163 ERROR 163 tELSE REPORT 
6110 033672 S6S: 





CZR60B0 RK611 OSKLS 
-Pil Oe- 


C2R 


ee ee 


WONOUIE Wwrue tn 


SESFAEGS “SSE ARREERE BRUNER EONS Sam Seno 
88 
ae 
#8 


COCK OKC KOKO rrrrnr Coro COOKS SSKK KK 
A DLRARPRRABRPDRARDARAL ABA DB DB ARAADADARDARABAABABD DDD DD DO : 


OruLWM-OW 


CTRL PRTY 


DEC-77 10:00 


77 
034102 


377 


MACY11 30( 1046) 77 
END OF PASS ROUTINE 


001222 


000 


. SBTTL 


02-DEC- 10:20 PAGE 114 


END OF PASS ROUTINE 


= AE SE A SE aE SE SE 0 a a a a a a a aa a a 
AINCRENENT THE PASS puree (SPASS) 

;*TYPE “END PASS #XXXXX TOTAL NUMBER OF ERRORS SINCE LAST REPORT YYYYY™ 
; #WHERE XXXXX AND YYYYY ARE NUMBERS 
;*IF trene> a ag Me 19 IT 
3% ISN’T JUMP TO TST1 


CIMAL 


F THE 
SEOP: 
SCOPE 
CLR TSTNM ;;ZERO THE TEST NUMBER 
CLR TIMES ::ZERO THE NUMBER OF ITERATIONS 
INC SPASS :: INCREMENT THE PASS NUMBER 
BIC #100000,SPASS ;;DON’T ALLOW A NEG. NUMBER 
EC (PC)+ : LOOP? 
smal BCT $DOAGN Y 
MOV (PC)+,3(PC)+ +t RESTORE COUNTER 
SENDCT: .WORD 
SEOPCT 
TYPE 65S 3; TYPE ASCIZ STRING 
BR 4 ::GET OVER ASCIZ 
ii e5S: -ASCIZ ¢<12><15>/END PASS’ #/ 
MOV SPASS, -(SP) ;;SAVE SPASS FOR TYPEOUT 
Ppa | PASS NUMBER 
TYPDS ::GO TYPE--DECIMAL ASCII WITH SIGN 
TYPE 67% i; TYPE ASCI TRING 
BR 6S > GET ASCIZ 
ij878: -ASCIZ 7 TOTAL ERRORS SINCE LAST REPORT / 
MOV SERTTL, -(SP) ;;SAVE SERTTL_ FOR TYPEOUT 
:? TOTAL R OF ERRORS 
TYPDS 33 YPE--DECIMAL ASCII WITH SIGN 
TYPE SCRLF i; TYPE _ CARRIAGE RETURN, LINE FEED 
CLR S$ERTTL >;CLEAR ERROR TOTAL 
SGETH2: MOV ae42, RO ?:GET MONITOR ADDRESS 
SDOAGN : BRANCH IF NO MONITOR 
RESET ?:CLEAR THE WORLD 
SENDAD: JSR PC, (RO) ::GO TO MONITOR 
NOP ;;SAVE ROOM 
NOP ::FOR 
NOP ::ACTIL 
SDOAGN: 
MP a(PC)+ ; ; RETURN 
SRTNAD: .WORD TST1 
SENULL: - BYTE -1,-1,0 ;;NULL CHARACTER STRING 
.SBTTL GENERATE BAD PARITY IN MEMORY 
: THIS ROUTINE ATTEMPTS TO GENERATE BAD PARITY WORDS IN 
1 i MEMORY. T R OF WORDS TO BE GENERATED AND THE AREA 
* i WHERE THEY ARE TO BE PLACED IS SPECIFIED IN THE WORDS 
1 i FOLLOWING THE CALL. IF ALL THE SPECIFIED WORDS CANNOT 
+x BE GENERATED, THE BUFFER IS CLEARED OF BAD PARITY WORDS. 





SEQ 0114 


ESRebE-Pii | Besbec=7? 10:00 


6167 ;% 
53 i 
;* 
7% 
5B iS 
- : # 
;*# 
g& 
sa 
;* 

1200 WRTPAR: 





a ae ae ae De tae a ae ae be Bae an a pe an ee Bean an bn Be ne ese Bn ae be ee 


POON OPCS COOK SSO COSCO SS OOS OOK COO 


eat 

110 6 

Bie ee ss 
B34134 0 7S: 
B3diae 

g34i44 Qs: 
Bie 

aes 1270s 00020 15S: 
Bair 


0 
le71 
eae o0000e 17S: 


000114 


OV ODO IN L wie ODS VN LO Owe ToS 


Presse tote ee: 


MK—-OWONCU CW 
rriririntal 
££ 


RBsor re 


721 10S: 


ooo0de 
27ei 000000 12S: 


177777 
bo539q +aue 
12 000020 

006004 14S: 


Seas eees 
Re 


a 
200 
ay 
Se 


NNN ee ee eee 


ROROFUFOFOROFOFOFOFORD 


bd mabe oth RATE BAO BARI TY IN Ae 


GeNERAYED. IF Ao 


PARITY WAS 
ONES 


CALL: 


IT WAS nNOT SUCCE SSE 


SEQ 0115 


1s 0 Hen nik the SEBIRED Sones" 70 CALLER 


DESIRED WORDS. IF RO IS ALL 


JSR anne 
POINTER TO AREA TO BE ALTERED 
R OF WORDS 


S82 5"R Bl 
oo gh 


ai6., one 


7$ 
#WR.PAR, (R3) 
#2,R3 


5 
#-1,(R1)+ 
R 


8 
#MEMBAS R32 
MEMPAR, RY 
#16.,R5 

RY 

17$ 


#PAR.EN, (R3) 
#2,R3 


les 
tne foes 
MPA 


R3 
ais. = 
RY 


: RTS Re 
WITH RO AS SUCCESS FLAG 


INTER 


;GET BUFFER 
Bt Be VECTOR AREA 


eae ie cE ON THIS BANK 


SerTinc Por PARITY 
‘Sua NEXT Ss 


F FINI 
+ a F neXt PARITY MEMORY ADDRESS 


ty UNTIL ALL LOCATIONS WRITTEN 
OAD BASE OF CONTROL REGS 


FL 
a cess REGISTERS 
Sack 4 


ITY ENABLE ON THIS BANK 


i CHECK PARITY DETECTION 
CK IF FINISHED 


:CHECK IF FINI 
it Barty Xt PERLTY EMORY ee 


PER POINTE 


sero FIRST BUFFER WORD - SHOULD GET 
; TRAP WHICH DECREMENTS R4 


Ee aE gor pee 
ALL LOCATIONS BAD 


arte gee 


ick EAR ALL OF AREA THAT WAS MADE BAD 


;SET FLAG THAT COULDN’T SET BAD PARITY 
: LORD BASE OF CONTROL RE ESTER s 

;NOW SET UP TO CLEAR PARIT 

;CONTROL REGISTERS AND SET 

;ENABLE WHERE APPLICABLE 





CZR6DB80 RK611 OSKLS CTRL PRT4 
CZR608.P11 


23 


EREREER SENN ONTO 


sys HSBBVRREONH— SBOE D 


000723 


cee 
NN 
ren 
NN 


8 
SSoscesce BS 


oOo oO 
—— 


gg 
enS8 


O02-DEC-77 10:00 


ooo001 





003274 
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oo0004 
000006 


O2-DEC-77 10:20 PAGE 116 
MORY 


GENERATE BAD PARITY IN ME 


18S: 


eS: 


20s: 


1 SO ERNE 


£57 BBa.en, cna : 
ADD #2,R3 
fas 
CMP (R2)+, (R2)+ ;SET POINTER FOR RETURN 
MOV MERR,MEMVEC RESET TRAP VECTOR 
MOV #PR7, MEMVEC+2 
MOV #PRO;-(SP) ;RESET PRIOTITY TO O 
MOV #19$,-(SP) 
RTI 
RTS Re 
CLR RO. ;CLEAR FLAG - BAD PARITY SET UP 
BR 1 
DEC RY ;DEC THE COUNTER 
cn (SP)+, (SP)+ :CLEAN STACK 
11S : 3GO CHECK NEXT LOCATION 


OR CHECK EE oe 
THis Ao OUT INE checks i AV: E MEMORY FOR PARITY OPTIC}. 
FONT ITY DETECT IS ENABLED ON THAT BANK. 


CALL: JSR PC, PARCHK 
RETURN: RTS PC’ 


° ;SET VECTOR FOR MEMORY PARITY CHECK 
RRVEC+2 


CLR MEMPAR Ch 
MOV SMEMBAS , R3 


MOV #1,R4 
MOV aPAR. EN, (R3) 


AR 
REGISTER TO DETERMINE IF 
+ OneM MORY_ CHECK ENABLE AVAILIBLE 


‘NE i te MEMORY C CHECK 


TST 
ete RS ENP AR (R3) SET Bie Ss TO BIT 11 
BIT #7740, (R32) jARE THEY SETED ? 
BNE 2s ; 
CLR MEMPAR ; 
BR 225 : 
THE ABOVE & LONES ADDED 24-OCT-77 
ADD #2,R3 : BUMP TO NEXT CSR 
ROL RY ;CHECK_IF FINISHED 
BNE 16% :NO, SET UP NEXT MEMORY PARITY MODULE 
BR 225 ?RESTORE TRAP VECTOR 
CMP (SP)+, (SP)+ ;ADJUST STACK 
CLR MEMPAR + 24-OCT-77 
ADD #2,R3 
ROL RY ;CHECK IF FINISHED 
BNE 16$ *NO, GET NEXT LOCATION 


SES 0116 





WWWWWWWWWWWW 
Poe eee hee 
DONTMLWM-OD 


CONOCOKO KOO 


611 


O34574 
034602 


1 
4616 
2 
O34e30 
034634 


034640 
034642 


OS4E4E 


cy. PRT4 


77 10:00 


Or 
ooOwWesy 
wVuor~ ats 


Te 


03 
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001202 


144364 


000000 


CHECK FOR MEMORY CHECK ENABLE 


22s: at, geRNvecse. ,ERRVEC ;RESTORE TRAP CATCHER 


rst ners ; CHECK F fenory CHECK ENABLE AVAILIABLE 
oR neRveese ,MEMVEC’ ; ;RESTORE TRAP CATCHER 
25s: ; RETURN 
oe H Rory check EAABCE TRAP PARITY TRAP. THE LOCATION WHERE 
ta THe 8 Foun Bab MOLES PORTED. ; 
MEMERR: MOV #10$, SESCAPE ;LOAD ESCAPE 
MOV (SP); TRAPPC :STORE PC 
os: SR bescone REDE CR EARETY ERROR 
y BIT #SW9, JSWR i ll IF LOOP ON ERR 
BNE 15s ap ghck STACK AND TRY AGAIN 
RTI ;NO 
1S$: Moy BSTACK, SP INITIALIZE STACK 
SBTTL CONTROLLE HALT INE 
iE TPTROMOGLITB a PS PRESER MEE! BoSGads GATES'EL AY THE SRBERER® 
1 a IS FORCED TO LAST PASS AND JUMPS TO END OF PASS. 
CTRHLT: MOV SBASE , R2 ;SE 611 BASE 
MOV WCCLR,RKCS1(R2) tCEar ON NTROLLER 
MOV BSTACK, SP CLEAR "STACK ' 
CLR SESCAPE 
CLRB SERFLG ET EBR Per 
tet 4 TEST I STAND LAC ONE 
CLR SEOPCT ZERO “pass P COUNT 
IMP SEOP :GO TO END OF PASS 
1S: HALT ;HALT PROGRAM 
J START1 :GO TO RESTART IF CONTINUE 


-SBTTL SCOPE HANDLER ROUTINE 


; j SEREESEEREESEESEEESHESSEROHSSSSRSERSEREAEROEREEERERERHEDLROE SENT 
{ATHIS ROUTING Ne SONTROS THE LOOPING OF SUBTESTS. IT WILL INCREMENT 
*#AND LOAD T! NUMBER(STSTNM) INTO THE DISPLAY REG. (DISPLAY<7:0>) 
} AND LOAD THE ERROR FLAG (SERFLG) INTO DISPLAY<15:08> 


!*THE SWITCH OPTIONS PROVIDED BY THIS ROUTINE ARE: 
; *SW14=1 LOOP ON TEST 

?*SW11=1 INHIBIT ITERATIONS 

:*xSWO9=1 LOOP ON 

j xSWOB=1 LOOP ON TEST IN SWR<7:0> 

: SCOPE ; ;SCOPE=IOT 

SSCOPE: 


SEQ 0117 


TT 


CZR6D0B0 RK611 
CZR608.P11 


ge 
i ie 
s 


NN 





NNNNNN 
SRPoo es ¢ 


aeaazen 


ener 
ERC NAS 


oo 


6374 


CORT rn 

etete te 

B.BaNow 

oa 
£ 










Barns com spt 


040000 





MACY11 


144262 


144214 


001103 
144124 
001106 


144072 


S$: 


6$:; 88888END OF 


73: 
4$: 


18: 


$SSVLAD: 


SOVER: 


BIT 


eR 


SBpREPGRE 


404% 
oa4 < 
o 


ABEBPP Ra RES 
“am 22 <o-w 


PAGE 118 SEQ O118 
;;TEST FOR N_SOFT-SWR 
#81714, aSWR 5 SLOOP PRESENT T ST? 
TART OF C FOR THE XOR TESTERSSeee 
sit BU GUNING ON Te ay ye STER CHANGE 
OsERAVEC, - (SP) i any ONTE NTS OF AME ERROM VECTOR 
BSS oueRAVEC LF FOR TIMEOUT, 
13?) « ,SHERRVEC 33 st THE VECTOR 
(SP)+, (SP)+ 3; AR fect R A TIME OUT 
(SP)+;QBERRVEC 3; STORE ERROR V TOR 
Cc FOR THE von’ HESTEReeegg 
88 08, ISWR 3L ON SPEC. TEST? 
=(SP) tCteAR A rE oe LOCATION | 
asWR, (SP) :;PICKUP THE DES EST NUMBER 
Fa phe j i BREING IF BAD TEST RIN SWR 
es’ 33 f ST NUMBER IS OUT OF RANGE 
), STSTNM Ee THE ST NUMBER 
+> 
He THE 
SWOSTBL,(SP) ;; att Rect POINTER 
a(5P)+, SLPADR 5 7 OOP st DESIRED Te TEST 
(3 ns 4 ss Pind olSih 1s R OFF OF THE STACK 
SERFLG ;iHAS 8 OCCURRED? 
SERnAx, SERFLG RAK, Fears FOR THIS TEST OCCURRED? 
SG1T09, Sun + CG0p ON ERROR? 
PERR, SLPADR : 
exer RO THE ERROR FL 
eAMES 1 SLERR THE NUMBER of ITERATIONS TO MAKE 
1$ : sc TO THE NEXT TEST 
#B1T11,aSWR i IN NHIB T ITERATIONS? 
$PASS ;3IF FIRS PASS OF PROGRAM 
LS 33 NHIBL at eRat ONS 
ICNT ;; INCREMENT ITERATION COUNT 
sires SICNT ; CHECK MBER R 195, TERATIONS MADE 
ICNT i 7REIN IF ; He ERATION CO COUNTER 
srkcnT, STIMES FFE TUTBED CimbeRe TONS 
STSTNA STESTN ::SET TEST NUMBER IN APT MAILBOX 
{3} 81 ; }CLEAR Rhee ESCAPE ROM ERROR ADDRESS 
SERMAX ONLY ONE(1) ERROR ON NEXT TEST 


w ALLOW 
$TSTNM, JDISPLAY  !OISPLAY TEST NUMBER 


CZR6DB0 RK611 OSKLS CTRL PRTY MACYI1 30(1046) O2-DEC-77 10:20 PAGE 119 
CZR608.P11  O2-DEC-77 10:00 SCOPE HANDLER ROUT INE SEG 0119 














6391 035150 013716 001106 Mov SLPADR, (SP) ; s FUDGE RETURN ADDRESS 
6 035156 720 six KCNT: 2000 . $;MAX. NUMBER OF ITERATIONS 
Se bnie OR HSE «| RRTING pula oF TERT 
6 164 "WORD TSTs+2 :;STARTING ADDRESS OF TEST 3 
Soe iS8 ies AMSG eats & HEE & 
an 13s . Teres + 2 3 t St 8 
Buds “HOR t His ; T st 19 
&40S “WORD T +183 : oF TEST § 
64 : TST144+ ; TEST 14 
407 1 “WORD TST1S+ : SF TEST te 
4 12 “iW Teties ; OF TEST 16 
ame ee oT 26 
puis “HORB «Fa tSA3 ti Se feat $4 
e413 035224 : TST23+ 4 or Test 3 
Bild Biases WR ites is 
e4ig 035232 “WORD TSTee+e 55 3 Test 26 
wig 32  HORB 4213638 35 et 4 
e420 “WORD T8t3es8 i OF Test 32 
6421 2 TST33+ 4 TEST 33 
64 ; TST34+ HH 3 

ey 5 WO Terae 4 Teer 39 
pies Gaeeee ‘HRB TSTHOtS i Be TEST 4 
64 : TST414 44 OF TEST 41 
38 “HOR 181483 i Or Test 43 
Bu WOR’ es : 4 T aT 44 
6431 "WORD TSTHS+ 4H OF TEST 4S 
6432 72 030770 "WORD TST HH TEST 46 
64 O3se7s O3ieee “WORD rst + 8 OF T 3 47 
64 7 “Wo TSTSO t:STARTING & TEST SO 
6435 032456 "WORD TSTS1 + ING ADDRESS OF TEST Si 
use ;auNAEERNERNanEORSOSSSensssesuedbennentones RKEKRKKRRRKAKAKRREKRE KALE 
6438 ‘ 

6429 035302 032777 001000 143630 SCOPI$: BIT #SW9, ISWR ;CHECK IF LOOP ON ERROR 

any 38312 108737 001103 Ts18 SERFLG ;CHECK IF ERROR OCCURED 

p43 035320 613718 001110 ti MOV SLPERR, (SP) ; GO BACK TO BEGINNING OF LOOP 


6446 5p RRR EERE REAR REE RRA R ERE EERE EKER LAER LER RRRL LAE ES 


roy RK611 OSKLS CTRL PRTY 


CZ2R6 


Pil 02-DEC-77 10:00 





T7bi05 | Bbise0 
T7P40 


001300 
035404 


001211 





o3S4e2e2 
001211 


at 
: 
= 


Roa 
RERRERE 
fs 


EEL ELECCL 


<= 
al] 


001211 


: 


043751 
001211 


035532 


MACY11 30(104%6) O2-DEC-77 
TYPE ERROR ROUTINE 


BiThy RRS BATE 


i THIS ROUTINE USES THE “ITEM CONTROL eve Sf (SITEMB) TO DETERMINE WHICH 


; ERROR 


NTRY 


1$: 


10S: 


11S: 


12S: 
13S: 


14S: 
15S: 


0 BE REPORTE 


S$ 
DEFINE WHAT I 


RFORMA 


STSTNM, ST 
BIC Hea STESTN 
pyc si Tere AD. 
DEC Be 
ASL RO 
ASL RO 
ASL RO 
ADD #SERRTB,RO 
MOV (RO)+, 2$ 
BEQ 3$ 
TYPE , SCRLF 
TYP 
MOV (RO)+,4S 
BEQ 
TYPE SCRLF 
wore (RO)+,R1 
BEQ s 
CLR 
MOV RO)+,RO 
MOV (RO)+’R2e 
TYPE CRLF 
MOVB tRO)+,R3 
TSTB (RO)+ 
TST R3 
BEQ 14S 
TST RY 
BNE 125 
MOV a(R1)+,-(SP) 
TYPOC 
DEC R3 
BEQ 13$ 
TYPE SPACE2 
BR lis 
TYPE SCRLF 
TST tRO) 
BEQ 4§ 
COM 4 
DEC Re 
BLE 208 
MOV (RO)+, 18% 
BEQ 10$ 
TST RY 


10:20 PAGE 120 


THEN USE 
TION IS Fo Be REPORTED CONCERNING 


; * PUEGESESSEGRUSROSSEGEESEGESEDEGSESDESSRSEESOEEEEEEESEEEEEEEEEES 
{PE SAVREG 


ttEan Unuseo Birs 


te RE 


ABLE™ (SERRTB) 


I 
ORM INDEX POR ERROR TABLE 


Geren Point OF ERROR ENTRY 
THERE ISN’T ONE 


YPE C 


INTE 
H IF _ THERE ISN’T ONE 


IAGE ae a OT FEED 


i ae G5 


RE 


;TYPE CR-LF 

; oes \ os 
:Bey INTE 

BRANCH I 


iE OF Porn Rt mal 


3NO_- 


R_ OF DATA WORDS 


& ST 
ile ifs 
EST rap ANY Ra a THIS HEADER 


; CHECK I "INDENT NORDS 
‘BUT 7’ igst DA BATA WORD ON STACK 


: TYPE 
ee TA WORDS 
iT SEPARATORS 


ph P NEXT HEADER SVOTLIELE 
ANGE INDENT 


Sol Tae 


NO-BRANC 

iG T NEXT. 
; IF NO ee 
; INDENT 


ERG 


INTER 
ET DATA 


SES 0120 


C RKG11 DSKLS CTRL PRTY MACYI1 30(1046) 02-DEC-77 10:20 PAGE 121 SEO 0121 
sie we T ROUTINE 








02-DEC-77 10:00 YPE ERROR 

6503 BEQ 178 10- BRANCH 
6 TYPE , SPACE2 NDENT 
6 17$: TYPE YPE OH 
6 188: ;HORO Os iON POINTER GOES HERE 
6 BR los ; LOOP 
6 20$ RESREG 
651 INC ERRCNT ; INCREMENT ERROR COUNT 
b 13 143362 gir aSWl2, ISWR CHECK IT ABORT AFTER 20 ERRORS 
pois 003250 CrP 820. ,ERRCNT i CHECK. Fre EROR THRESHOLD EXCEEDED 
6515 TYPE , ABORT Tbe pRocR BEEN ABORTED BECAUSE 
6 18 EXCEEDED” 
el eu (is git retin Re 
6 : i 000001 033720 MOV #1, SEOPCT ;FORCE END OF PASS COUNT TO ONE FOR ABORT 
6 i 12706 001100 MOV aStaAck, SP ?INITIALIZE STACK 
6 3 4 1 033672 — IMP ‘BRING IN NEXT PROGRAM IN CHAIN 
6 25$ RTS PC 
S SBTTL GENERATE HEADERS FOR SECTOR, TRACK, AND CYLINDER INCREMENTS 
6 : 003302 INCHDR: MOV CYLN HEADER ;LOAD HEADER WORD 1 
6 - aaa CLR : ih :CALCULATE HEADER HORD 2 
6 135644 ASR is oe 
65 2 ASR 
ES a 33 Bis8 noe A feADER+2 

sie 
& ik Bg s304 G4 #14 , HEADER+2 
He MOV HEADER ~(SP) :GENERATE XOR 

903306 MOV R42, HEADER+4 
6 3306 BIC HEADER, HEADER+4 
6S BIC ADERS2. (SP) 
65 BI (SP)+, HEADER+4 
6 40 903220 0 MoV CYLN,E.OCYL ; INCREMENT DISK ADDRESS 
& ni INCB mm 
p543 003206 CMPB #26,£.DA 
6545 or Re 50 
6 46 INCE DA+1 
654 003207 CMP’ $3,£.0A+1 
654 BNE $ 
p54 CLR -DA 
6 INC E-DCYL 
2 10S: RTS PC ; RETURN 
p553 .SBTTL CALCULATE EXPECTED HEADER 
6555 03 o0s003 CALHDR: CLR R3 StRe EXPECTED FIRST WORD 
6556 036010 013701 003220 MOV E.DCYL,R1 STORE CYLI 
6557 036014 001406 BEQ 
6558 036016 012700 oo0020 MOV #16.,RO + CAD KSATFT COUNT 


F10 


RK611 exis CTRL PRTY MACYI1 30(1046) O2-DEC-77 PAGE 122 SES dl22 
&Spebe. Pit 


10:20 
02-DEC-77 10:00 CALCULATE EXPECTED HEADER 





6SS 1S: ROL R1 ;CALCULATE FIRST WORD 
6 ROR Rs 
6 DEC’ R 
e 26 S$ oy BS E.MR2 LOAD FIRST WORD 
UU $ ° H 
e 4 pg356e MOV E08, -(SP :GET TRACK AND SECTOR 
6 BEQ g :CHECK IF TRACK = 0 AND SECTOR = O 
6 000377 BIC #377, (SP) heck CTOR BITS 
6 BEQ 6$ :CHECK TRACK = 0 
6 ASR (SP) ‘SHIFT HEAD 3 BITS RIGHT 
6569 ASR (SP) 
6 ASR (SP) 
657 003206 6S: BISB E.DA, (SP) ;OR IN SECTOR BITS 
657 7$: MOV ($P)4+,R1 
657 010000 003200 BIT #CFMT‘E.CS1 ;CHECK FORMAT = SECTOR 
6574 BEQ 8$ !NO, CALCULATE SECOND WORD 
6 001000 B15 481T9,R1 :SEt FORMAT BIT 
6 1 8S L R ;CLEAR EXPECTED SECOND WORD 
fore Geeloe Boise a, ils eet di = © 
e573 11 to7b8 000020 MOV #16.,RO ‘LOAD SHIFT COUNT 
6580 114 101 10$ ROL Ri 
B58) 116 3 ROR R3 
Soe es es 
et e155 804343 003230 15S: MOV Rose mes ;LOAD SECOND WORD 
b585 036130 000207 RTS PC : RETURN 
6587 H = SEEKER ARSERAAREKRERA KARA SRS SEARARAKREARRAKRARRSRALARRAAASRRAARARERAEK 
6588 SBTTL GENERATE ECC WORD 
6590 036132 737 003252 ECCGEN: TST P1.BIT sCHECK IF 1 
659 036136 1410 BE 3$ ;NO, CK IF BIT 31 = 1 
6 1 7 000001 003266 BI #1,ECCHI :NO, CHECK IF BIT 31 = 1 
65 146 1410 BEQ tNO, SET ECC XORED BIT 
6594 1 37 003272 1S: CLR ECCXOR : CLEAR ECC XORED BIT 
6595 154 i CLC CARRY FLOP 
65 1 1 BR 7S : SHIFT tN ECC BIT 
6598 036160 000001 o03266 35: BIT #1,ECCHI ;CHECK IF BIT 31 = 1 
6599 1 BEQ 1$ NO CLEAR ECC XORED BIT 
B600 1 7 000001 003272 SS: MOV #1,ECCXOR :SET ECC 
501 SEC :SET ESRRY OF oP 

&b02 003270 7$: ROR ECCLO 
6603 036204 003266 ROR ECCHI 
6604 036210 005737 003272 TST ECCXOR ;CHECK IF XOR NEEDED 
B605 14 Isee BEQ 10 *NO, RETURN 
66 1g 127 020020 MOV sBITL3'BIT4, -(SP§ ;60 XOR OF ECC BITS 
6607 3716 003270 BIC ECCLO, ( , & il, Bo. 2 

O3bee6 oue7 0 003270 BIC aBITISEBITY, eccLé 
66 7 BIS (SP)+, ECCL 
6610 O36240 012746 400 MOV #81T10'8ITS, -<(SP) 
pets eter 2400 003261 Bte a eetorerts ECCHI 
PELs OSE 5eE 052637 BOSsee BIS (SP)+,ECCHI’ 
6614 O36e62 013737 003266 003234 10S: MOV ECCHI‘’E.ECPT ;STORE ECC PATTERN 


egnenee., ees OSKLS cre. PRTY 
C2R6DB.P11 Oe-DEC-7 


| 
Now 


RNS oneies 


ae tat at atl 
R2O0-8 


aa 


Parag staat 
SOT FwH-o 


Oba 


b3ce76 


036300 


036574 


10:00 


a Ld 174000 





005737 
001007 
005737 


042040 


bb3288 


037012 


B00440 
boone 


003164 


036544 
0S3063 


001000 


001202 
00000e 


003252 
003256 


. ee ———— 


RATE ECC 


MACYI1 30(1046) O2-DEC-77 10:20 PAGE 123 
SCENE SEQ 0123 


003234 
003224 
003224 
003224 


003224 


sens? 


6 
003164 
003224 


801518 


142462 


Bbb6se 
Bosi68 
003224 
001202 
00131e 


142366 


BIC #174000,E.ECPT ;MASK UNSEEN BITS 
PC : RETURN 


RTS 
H WTTTTTTTT TTT TTT TTT TTT TT TTT TTT IT TTT TL TTT ttt 
‘ASTTL SIMULATE ONE BIT WRITE IN MAINTENCE MODE 


WRTBIT: BIS #OMO! MEWD! WRTGAT,E.MR1 a as 
Ha setecrtin ER : EXPECTED MRI 
8 YE TE A 
ent fi .erT ; | Cex sas 19u8 One 
IC SMEWO E.MRI CAT a TION 
ST -BIt aa IF Ne NST TPON 


BNE C CHECK “FOR FR Comp ADVANCE 
TST Me.BIT DELAY 


brs ape, E.MRI1 ey ‘Heksalt 6 


10$ :CLOCK IN ZE 
Ss: TST M2. BIT 5 CHECK FOR PRECOMP. ADVANCE 
BNE 10$ K IN ZERO 
BIS WPCA, EMR OMPENSATION ADVANCE 
10$ MOV BOMD!MCLK RKMRICR2) ;CLOCK IN DATA BIT 
MOV #DMO RENAL CRED 
MOV RKMRI(R2),.1.MR1 ;STORE mR 
CMP T.MR1,E. MRL iGueck FR Cc CT 
BEQ 1S$ iY N REST OF BIT 
MOV 413s SCAPE iL 
MOV MWe, EMW+2 ; MESSAGE 
MOV (SP),-(SP) 3ST ORE | RETURN 
RTS P RE TERR OR 
13S: BI #5W9, ISWR } CHE K IF L ON ERROR 
Q 15$ CONTINUE 
IMP 63$ G0" LOOP ON ERROR 
1SS: BIS aE RESET T IT ON INDICATION 
Vv SOROY AGLI, buries RES ; CLOCK A BI 
MOV HOMO RKMRI (Re) 
MOV RKM 1 the) T. ft ;STORE MR 
CMP T.MR1,E.MR1 :CHECK IF ARI CORRECT 
BEQ iy BET RN 
MOV #17$, SESCAPE 
mov Wena EMi+e #LOAD ERROR MESSAGE 
RTS Sol “ REPORT. ERROR 
17S: BIT #SW9, ISWR ;CHECK IF LOOP ON ERROR 
19S: CLR SESCAPE ;CLEAR_ESCAPE 
ADD #2, (SP) : RD UST ESCAPE 
RTS PC RETURN 
20S: TST P1.BIT ;CHECK IF NEXT BIT A ONE 
BNE 30$ :YES, CHECK FOR PRECOMP. DELAY 
TST M1.BIT :CHECK FOR PRECOMP. ADVANCE 


CZR6D0B0 RK611 OSKLS CTRL PRTY 
CZR608.P1i1 O02-DEC-77 10:00 


6671 036600 001412 
6672 052737 


ratat atta ata 
Vet za 


pa 


cae 





037004 
6705 037010 
67 037012 005037 O012e02 
08 037016 O1e7 
6709 03702 B00179 Tasos 


037026 105737 003254 
O37ose 010 
037034 1 i 


NNNNNNNNNNNNNNSN 
ee ee 
WONTWUC WoO 


novo) 
Ht at et te 
=] 


ate 


COOOL OOK rroro 


NN 


003224 


003224 
000026 
000026 
003164 
003224 


00120e 
00131e 
142232 
oo32e4 
000026 


ses 
is 


H10 


MACY11 30(104%6) O2-DEC-77 10:20 PAGE 124 SEG O124 
SIMULATE ONE BIT WRITE IN MAINTENCE MODE 
BEQ 40$ 3NO, CHECK MR 
BIS #PCA,E.MRI SET PRECOMP ADVANCE 
BR 40$ i reck MRI 
30S: TST M1.81T ; CHECK F PRECOMP. DELAY 
Ubs ;NO HERE MR 
IS #PCO,E.MRI :SEt SRECOMP” + eLay 
40S: MOV #OMDINCLK. RKMRI (AB) ;CLOCK IN DATA BIT 
MOV sOMD RKMRI (Re) 
MOV RKMRI(R2),T. AR ;STORE MR1 
cnr T.RR1,E.MRL ; CHECK IF WRI C ORRECT wid 
Vv ta3s SESCAPE (5a6 
MOV SEMWS , EMW+2 LOAD ERROR MESSAGE 
MOV (SP),-(SP) TURN 
RTS PC REPORT ERROR 
425: BIT * | sSW9,aSWR ; CHECK IF LOOP 0 ON ERROR 
45S: Be: MR1 tchte’ an TReN TRANSITION 
MOV SOMO: MEL 1 we che! vif TRANSITION 
Vv sm RKMRI (Re) 
V RKMRI (Re), T. MRI ee 
chr TRL, E. MRL K ai uh CORRECT 


001202 
001312 


142142 


000026 


000026 


000026 


ne fees bs ae ee MESSAGE 
wos. fh fekcorr =o BRM EO 


ADD #2, (SP) :ROJUST RETURN 
RTS PC 
63$: CLR SESCAPE CLEAR ESCAPE 
MOV STACK, SP :FORCE STACK 
IMP JSLPERR : JUMP TO LOOP ADDRESS 


5g. HE HE AE HE AE AE HE HE HE HE AE EH AE HE EH HE HE HEE HE HE HH HE HH EE EH 
SBTTL SIMULATE ONE BIT OF READ DATA IN MAINTENENCE MODE 


ROBIT: TSTB PR. BIT 5 CHECK IF 
BNE 108 :YES, S MUCATE ONE 
TSTB 1.BIT *CHECK IF PREVIOUS ONE 
BEQ ug j NSE SERT TR On 
MOV #OMD!MCLK, rec cf ) NOT INSE T TRANSITION 
BR +} Er obk ON ZERO 
4$: MOV #DMD!MCLK!MERD, sie ia ; INSERT TRANSITION 
S$: MOV WOMD RKMRI(R2)’ CLOCK IN "ZERO 
MOV soni! IMCLK RKMR R1(R2) 
MOV #OM RKMRICR 
RTS ; RETURN 


CZR60B0 RK611 OSKLS cm PRTY 
CZ2R60B8.P11 O2-DEC-77 10:00 


000440 


Ooo 


COO TTCTO 
A 
REG BSoN 


7136 
67 7144 
67 ot ae 
67 7154 
67 71 
6740 1 
674 7164 
674 166 
6743 172 






Ra 





3 

ae 
67 
e768 
67 Sa 
67 Is 
6764 73le 
pzeP 7. te 
676 5330 1 
ce freee Bre 
et Beem Bee 
6772 336 BI zea? oooo04 
Gr fies faeces 
6775 7356 105037 037402 
e778 ar be 10S037 037401 
67 7. 105037 037400 
6778 037372 pi seth 
67793 sears 126) 
6780 7376 00020 
6781 037400 000 
6782 037401 000 





MACY11 a try 2 


o0002e6 
O26 
0026 


037402 
037400 


037402 


001234 
001235 


oooo004 


001214 


037312 
000004 


001216 
000004 


I10 


O2-DEC-77 10:20 


PAGE 125 
ATE ONE BIT OF READ DATA IN MAINTENENCE MODE 


;CLOCK IN ONE 


; RETURN 


bavi hove al SFFLG tsTO REPORT FATAL ERROR 
MO 


TO oa gd FATAL ERR 
;;T0 TYPE A MESSAGE 
3370 ONLY REPORT FATAL ERROR 


L 
;;PUT LENGTH IN MAILBOX 
3; TELL AP 


I 
R 
; ;PUSH 155776 ON 
::CALL TYPE MACRO 


55 FOND REPORT FATAL ERROR? 


10$: nov #OMD! MCLK LK RKMRI CRE) 5 
MOV SOMO! FCLK?MERO, RKMR1(R2) 
MO 8OMD, RKMRI(R2)” 
RTS 
.SBTTL APT COMMUNICATIONS ROUTINE 
$Arv1: 1, 
SATY3: MO 
BR satyc 
SATY4: MOVE #1,SFFLG 
SATYC: 
MOV Ro? (p) 
TSTB S$MFLG 
BEQ S$ 
CMPB BAPTENV, SENV 
BNE 3 
B1Te #APTSPOOL , SENVM 
MOV 34(SP), RO 
ADD #2, 4(SP) 
1S: TST SMSGTYPE 
BOY As $MSGAD 
2s: TSTB (RO)+ 
at EASGAD, RO 
ASR 
MOV RO, SMSGLGT 
nov #4, SMSG YPE 
3S: MOV 34(SP) 4S 
ADD #2,4(SP) 
MOV 177776, -(SP) 
JSR PC, STYPE 
ee: WORD 
10$: TSTB SFFLG 
BEQ 12S 
TST SENV 
BEG 125 
11S: TST SMSGTYPE 
BNE i 
MOV a4 (SP) SFATAL 
ADD 4(SA) 
INC SRST Re 
12S: CLRB ere LG 
CLRB SLFLG 
CLRB SMFLG 
MOV (SP)+,R1 
MOV (SP)+'RO 
RTS PC 
S$MFLG: .BYTE O 
"BYTE OO 


SLFLG: 


;31F NOT: 
; FINISHED LAST MESSAGE? 
;;IF_NOT: WAIT 
}#GET ERROR NP RETURN ADDR. 
;; TELL Apt 55 TAKE ERROR 
::CLEAR FATAL FLAG 
;;CLEAR LOG FL 
aye ae MESSAGE FLAG 

:POP STACK INTO R1 
FOP STACK INTO RO 
ss NESS. FLAG 

G FLAG 


SES 0125 


GDB0 RK6LI DSKLS CTRL PRTY MACYI1 30(1046) O2-DEC-77 10: 20. PAGE 126 SEG 0126 
E DB.P G2-0EC-77 10:00 APT COMMUNICATIONS ROUTINE 
6783 037402 . 000 SFFLG: BYTE 0 ;;FATAL FLAG 
6785 84 APTSIZE= 
786 000001 APTENV=001 
6787 000100 APT = 
6788 000040 APTCSUP 
6789 .SBTTL ERROR HANDLER ROUTINE 
67931 H praTe ROUTING WILE INCREMENT THE ERROR FLAG AND THE ERROR COUNT. 
6792 kT THI ROUT i WILL T ante ERROR FLAG AND THE ERROR COUNT, 
6733 ; iH rm THE ADDRESS OF THE ERROR CALL 
673 Ae Si OFF Re ROT ffeo ev BY THIS ROUTINE ARE: 
6797 ;aeutgst INHIBIT ERROR TYPEOUTS 
6798 :x5W10= BELL ERROR 
e800 Seace sone espa 
6801 :# ERR N ;;ERROR=EMT AND N=ERROR ITEM NUMBER 
6803 g37404 SERROR: 
74 04407 K ;; TEST FOR CHANGE IN SOFT-SWR 
68 outs ObieeS OO tt03 shan a a ae TLeT THE FLAG GO TO ZERO 
0 7414 53 901108 141520 MOV 3? TNM, DISPLAY ;:DISPLAY TEST NUMBER AND ERROR FLAG 
08 7422 777 O02 141510 BIT #81T10, JSWR :?BELL ON E ? 
6809 7430 O014 BEQ i$ ::NO - SKIP 
6810 pase 44 901204 TYPE SBELL ; RING BEL 
6811 S2 ille 1S: INC $e COUNT R OF 
b8ie oie 0116 001116 sexes nov (SP), SERRPC ::GET ADDRESS OF ERROR INSTRUCTION 
6814 ae 117737 141436 001114 MOVB sehr, Sitene ;;STRIP_AND SAVE THE TERROR ITEM CODE 
eae _ ee BAe bikie Typeours. 
Pai? 74 237 ISR — ::G0 TO USER ERROR ROU INE 
b8ig 74 1 1 OOl211 sn TYPE PSCRLF 
6820 9 122737 000001 001234 ; CHEB #APTENV, SENV ; RUNNING IN APT MODE on 
037812 rk) 7 001114 037524 MOVB TEMB, 215 :;SET ITEM NUMBER AS ERROR NUMBER 
682 00473 7154 _ JSR Fc, , SATYS ;;REPORT FATAL ERROR TO APT 
ae ces: ae Bos ser eno oor 
68 5 141404 es: TST aSWR ::HALT ON ERROR 
6828 037524 100002 BPL 3$ ::SKIP IF CONTINUE 
| 75 1044 BR SUR ee POR CHONGE IN SOFT-SUR 
6831 7e4 0327 7 001000 141370 35: BIT #BITO9, ISWR Hy SWITCH SET? 
pe3e p72 13716 001110 MOV SLPERR, (SP) >:FUDGE RETURN FOR LOOPING 
6834 037555 g05/;3 001202 4S: TST SESCAPE $s CHECK FOR AN ESCAPE ADDRESS 
bee 037568 po430e 001202 sad MOV SESCAPE , (SP) ::FUDGE RETURN ADDRESS FOR ESCAPE 
6838 037570 022737 oO34062 ocOoo04e : CMP #SENDAD, #42 ;;ACT-11 AUTO-ACCEPT? 





~~. ee aa 
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02-0EC-77 10:00 ERROR HANDLER ROUTINE 
75 1001 BNE 6S ;;BRANCH IF NO 
peuG SOB referee - HALT >: YES 
eee S5EbS ooo0002 E RTI ; ; RETURN 
ea .SBTTL TYPE ROUTINE 
68 + PERERA SAAKKRRERKLARRSSELERSERAAARAARE RELA ARRAARRREARRRREEH REESE 
684 ; BROUT INE TO TYPE ASCIZ MESSAGE. MESSAGE MUST TERMINATE WITH A O BYTE. 
6848 *THE ROUTINE WILL INSERT A NUMBER OF NULL CHARACTERS AFTER A LINE FEED. 
6849 j ANOTEL: CONTAINS THE CHARACTER 79 BE AS THE FILLER CHARACTER. 
6850 + #NOTEe: LLS CONTAINS THE NUMBER OF FILLER CHARACTERS REQUIRED. 
6851 j #NOTES: SFILLC CONTAINS THE CHARACTER TO FILL AFTER. 
6853 >*#CALL: 
6854 ?%1) USING A TRAP INSTRUCTION 
6855 8 TYPE , MESADR ;;MESADR IS FIRST ADDRESS OF AN ASCIZ STRING 
td :# TYPE 
eeeg 3 an 
6860 - 
6861 037604 105737 001157 STYPE: TSTB STPFLG ;;1S THERE A TERMINAL? 
68 037619 100002 BPL 1S ;;BR IF YES 
03761 000006 HALT ?:HALT HERE IF NO TERMINAL 
6864 7614 000430 BR ; ; LEAVE 
B OSE28 Bi>E a tov BOISE) RO $i BPVE RORESS OF ASCIZ STRING 
Ht] 7 e273 ereaeyt 001234 CMPB BAPTENY, SENV ?;RUNNING IN APT MODE 
bBb8 1011 BNE 62S ??NO,GO CHECK FOR APT CONSOLE 
686 7634 7 000100 001235 BITB BAPTSPOOL,SENVM ;; SP! ME TO APT 
6870 642 1405 BEQ 6 ;3NO OR CONSOLE 
6871 644 Ol 037654 MOV RO,61$ >3SET Me ADDRESS FOR APT 
b876 g680 0047 037144 i JSR PC; SATY3 5 38P 
6874 i3e7 000040 001235 625: BITB #APTCSUP, SENVM j ABT CONSOLE 
6875 4 [089 BNE 60S 33 YES, & SeHBOts 
5876 112046 2s: MOVB (RO)+,-(SP) > PUSH CHARAC 0 BE TYPED | ONTO STACK 
68 0376 1005 BNE 4s :;BR IF IT rSNTT 
6878 767, 726 TS (SP)+ ::IF TERMINATOR POR IT bre" tHe STACK 
6879 O37674 012600 60S: MOV (oP )e RO $F RESTORE RO 
6880 76 06 716 oo0002 3$: BOD SP) j ;ADIUST RETURN PC 
6882 aa 122716 000011 4S: cna wT, (SP) ;;BRANCH IF <HT> 
Be rie 122716 oo0200 CMPB BCRLF , (SP) ;;BRANCH IF NOT <CRLF> 
PBee 5538 005726 eae (SP)+ ;;POP_ <CR><LF> EQUIV 
5887 037720 104401 TYPE :: TYPE A CR AND LF 
pees p3728e 1 4S 040062 CLRB SCHARCNT +: CLEAR CHARACTER COUNT 
Peat Oo aq ante 40016 S$ AER 5a STYPEC eet TBE THis CHARACTER TER 
Pas p37 280 reries4 Boise 63 CMPB 7 ME 


4 
oa 


: SFILLC, (SP)+ ::1S IT FOR FILLER CHARS. ? 
6893 037744 001350 BNE 2s ::IF NO GO GET NEXT CHAR. 
6894 037746 013746 001154 MOV $NULL , - (SP) ::GET # OF FILLER CHARS. NEEDED 
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6947 

6948 0400 
6949 0400 
6950 0401 


Bre 


105366 


000001 


002770 


Buboes 


000770 


112716 
004737 





won 


bobdbe 


oo000e 


646 000000 
637 000001 040311 
637 040313 
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11 Boks 


A NULL Dt NEED to BE TYPED? 


7S: DECB 1(SP) 
BLT bs aoa F NO--GO POP THE NULL OFF OF STACK 
bece SKHARCNT 118 TYPE OA tke A COUNT 
BR 7$ + oop 

;HORIZONTAL TAB PROCESSOR 

8S: MOVB ; REPLACE TAB WITH SPACE 

9S: JSR Bc, $t¥Pec 
BITB 7’ SCHARCNT ; BRANCH IF NOT AT 
BNE Ss’ i TA STOP 
TST (SP)+ Ha SPACE OFF OFFS 

STYPEC: ear TPS IT UNTIL MORINT R IS READY 
fot. S (Spo. TPB HAR_T TYPED INTO DATA REG. 
cn scr, 2t8P) ABs TER ae ARRTBGE RETURN’ 
CLRB CHARCNT Pal CHARACTER COUNT 

1s OnPB OC SSP) ATT MARACTER A LINE FEED? 

, Be9 sTyPeX Wir YE 

NCB PC)+ SUNT" 


SCHARCNT: .WORD O 
STYPEX: RTS PC 


-SBTTL BINARY TO OCTAL (ASCII) AND TYPE 


see ge ee be re agp ree a eer er gn ee pt oe ee 
ATHIS R OUTS TS USED T i A 16-BIT BINARY NUMBER TO A 6-DIGIT 


of ACTER 
SE CTER COUNT STORAGE 


NUMBER AND TYPE IT. 

j #$TYPOS---ENTE ER HERE TO SETUP SUPPRESS ZEROS AND NUMBER OF DIGITS TO TYPE 
;% Vv NUM, -(SP) ;;NUMBER TO BE TYPED 
: TYPOS :;CALL FOR TYPEOUT 
pe BYTE N ;;N=1 TO 6&6 FOR NUMBER OF DIGITS TO TYPE 
7% BYTE &M 3;M= Ro 3 
x ;1=TYPE LEADING ZEROS 
i  t O=SUPPRESS LEADING ZEROS 
:#$TYPON----ENTER HERE TO TYPE OUT WITH THE SAME PARAMETERS AS THE LAST 
i x8 ty TYPOS OR $TYPOC 
ie - MOV NUM, -(SP) ;;NUMBER TO BE TYPED 
i TYPON ::CALL FOR TYPEOUT 
j ¥$TYPOC---ENTER HERE FOR TYPEOUT OF A 16 BIT NUMBER 
iS MOV NUM, - (SP) ;;NUMBER TO BE TYPED 
;% TYPOC 3;;CALL FOR TYPEOUT 
STYPOS: MOV a(SP),-(SP) ;;PICKUP THE MODE 

MOVB 1(SP), SOF ILL ;;LOAD ZERO FILL SWITCH 

MOVB (SP)+,$OMODE+1 .;;NUMBER OF DIGITS TO TYPE 


M10 
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b3es BaBITs §BBG4dg Oopebe BRO Beh ;;ADJUST RETURN ADDRESS 
H1er3 BOBBRL BAGRLA ST¥POC: FBV ReSohbkes «1ST FUR SERCeS thE 


040310 S$TYPON: T 1. TERATION COUNT 


S 
8 


e00- 
< 
20 
') 

ee et 

SSO 
hd 


F YE 
T SuBPRESS ANYMORE O’S 
THIS DIGIT ASCII 


F NOT ALREADY 


eeeq a 5735 

ESES 1 1 

£327 i 46 MOV } ti SaVE RS 

£368 poise Obese 040313 SOMODE+1, RY :;GET THE NUMBER OF DIGITS TO TYPE 
g i ooo006 #6,R4 ; SUBTRACT IT FOR MAX. ALLOWED 
pees Giteg He Gias Rove EET SRL IUE SEMO nL Suro 
bSpe bugi7e Boei0s 1S: fo OtC«@R te RARE Hee INTO “co 

iss ae ae 2s: FOL FS + OO RM THIS DIGIT 

bee O4 O10s 3S: Rov 3 ;;GET_LSB OF THIS DIGIT 

par3 i ci 040312 CB $QMODE is DPE. TH S DIGIT? 

Ee PEL" PBa°§ 2% 

ue SUPPRESS THIS O 

eB 

6981 


ie 
See 
x 
Ro 
: 
aS 
252 


o 


a 
HORee 
RICO 


oo 
| maul and 
ER 
= 
“N 
i) 


6 1 
347 GT F 0 DO 
Base O4oseR pozads Bet 4StsédéS biBR TE Done 
6987 INC RY 33 LAST DIGIT ISN’T A BLANK 
5388 4 4 BR es. HH THE LA T DIGIT 
6S: MOV (SP)+,RS 3;;RES 

baa, funere bLSe3 roy fees TMESTORE fg 
e932 uge74 O1gbee oo00002 coo004 MOV 2(SP)?4 (SP) i GEF ORE BFack FOR RETURNING 

93 1261 MOV (SP)+' (SP) 
Paee Bug ae i Qs YTE 0 + OE TURN FOR ASCII DIGIT 
eaae Makleig 600 :BYT 0 tt SEOMTNATOR FOR TYPE ROUTINE 
6997 040310 000 SOCNT: .BYTE OQ ?:OCTAL DIGIT COUNTER 
6998 Ouo3it 000 SOFILL: :BYTE O +: ZERO PILL ITCH 

939 040312 ooc000 SOMODE: .WORD 0 > NUMBER DIGITS TO TYPE 

oo .SBTTL CONVERT BINARY TO DECIMAL’AND TYPE ROUTINE 


0 

7001 

70 5 5. HE HE HE Ae HE Ae HE AE HE HE HH a a a HH a EE 
700 ;#THIS ROUTINE IS USED TO CHANGE A 16-BIT BINARY NUMBER TO A S-DIGIT 
7004 ;*SIGNED DECIMAL (ASCII) NUMBER AND Mbt | IT. DEPENDING ON WHETHER THE 
7005 ;*NUMBER IS POSITIVE OR NEGATIVE A SPACE OR A MINUS SIGN WILL BE TYPED 
7006 ;*BEFORE THE FIRST DIGIT OF THE NUMBER. LEADING ZEROS WILL ALWAYS BE 


SES 01293 


10 
130 
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-77 10:00 CONVERT BINARY TO DECIMAL AND TYPE ROUTINE eects: 





z 7 j #REPLACED WITH SPACES. 
7008 + a ” MoV NUM, -(SP) ;;PUT_THE BINARY NUMBER ON THE STACK 
73H 3% TYPDS ::GO TO THE ROUTINE 

i STYPDS: 
7 ie 1 MOV RO,-(SP) ::PUSH RO ON STACK 
sta 1pOue MOV R1,-(SP) :PUSH R1 ON STACK 
vole 185: mY ASntge) HUB AS 90 Stack 
701 10546 MOV RS’-(SP) :;PUSH_RS ON STACK 
701 12746 020200 MOV #20200, -(SP) ::SET BLANK weit TcH AND SIGN 
> — BL eo bieeT Faineur Is Pose” 
702 bossoe NEG RS Hin T INARY NUMBER 
7082 1 oo00sS 000001 MOVB #’-,1(SP) > MAKE T ASCII NUMBER NEG 
702 1S: CLR RO :3;ZERO THE C ANTS INDEX 
7024 1 040530 MOV #SOBLK,R3 : SETUP THE OU PUT POINTER 
702s 723 O00040 oni HOVE a. , (R3)+ s#8ET oat S ue RSt CHARACTER TO A BLANK 
7087 i O1 040520 ; MOV S$OTBL(RO),R1 pices THE FORE TANT 
2 1 3S: Su R1,RS ; EORM THIS BCD DIGIT 
7080 INC Re + UN CREASE THE BCD DIGIT BY 1 
7038 68 Reo. 0s 4$: ADD R1,RS ;;ADD BACK T CONSTANT 
20 3 rst Re Hci IF DIGIT=0 
70 1057 TST (SP 23ST Ss? 
fe ae Heels an Hint Gea woe ors 
7037 1¢ 19 316 SS: ASLB (SP) i SD? 
70 16 1166 000001 177777 MOVB 1(SP) ,-1(R3) tiWes--sey T SIGN 
7040 ea 7 000060 6S: BIS #’0,Re ::MAKE THE BCO DIGIT ASCII 
704 7 000040 75: BIS #’ ‘Re ::MAKE_IT A SPACE _IF NOT ALREADY A DIGIT 
A 34 Oee nove Re, tR3)+ j ;PUL_ THI AcHARA TER IN THE OUTPUT BUFFER 
7044 40 0027 000010 CMP RO, #10 ::CHECK THE TABLE INDEX 
rote Baowwe Bnsod8 Bt i 168 $8 Bayer over 
7047 o4 50 10502 MOV RS,Re ::GET THE LSD 
7048 04 764 BR 6S ::G0 C TO ASCII 

sf 

7048 040454 105726 8S: TSTB (oP )+ j;WAS THE LSO THE FIRST NON-ZERO? 
7051 By 11 177777 177776 MOVB -1(SP),-2(R3)  };YES--SET THE SIGN FOR TYPING 
7052 O40466 105013 9S: CLRB (R3) ::SET THE TERMINATOR 
roar Buus BLEERS mY Se}S:REHipSe Snack |T3 Bs 
Spee Bupuse B1se0 AS 5008 stack Inte OP 
705 pubes 1se0 MOV (5P)+’RO ::POP STACK _INTO Ro 
7058 O40502 104401 040530 TYPE SDBLK ::NOW TYPE THE NUMBER 
reed Bubeis isete oO000E co0o0s “REE RES eT ennai 
7061 040516 o0000e RTI . ;;RETURN TO USER 
7062 040520 0623420 $DTBL: 10000. 
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CZR608.P 02- ONVERT BINARY TO DECIMAL 
7063 1750 1000. 
7064 yy ip 
5 ? 6 SDBLK: 
a .SBTTL ny tNPUT ROUT INE 
2063 $3 oS agee gape cmap nape 9.0 nan a amen and apmmpmeine meaalmany Fm 
7 STKCNT: . OF ITEMS IN QUEUE 
is ie a Eirini 
7074 TKQSRT: :BLKB 1 + KE KEYBOARD QUEUE 
7075 O40s TKQEND=. 
707 0550 - EVEN 
7078 “TK INITIALIZE R 
7078 “THIS TINE WILL INE TrALIze THE TTY KEYBOARD INPUT QUEUE 
20 Bd ‘roe UP THE ne WILE INE VECTOR AND TURN ON THE KEYBOARD INTERRUPT 
7082  #CALL: 
7083 + a JSR PC, STKINT 
20 i RETURN 
7 osso 7 0S40 $TKINT: CLR STK ;;CLEAR COUNT OF ITEMS IN QUEUE 
708 0554 p03934 puoeue o4os42 MOV “ST COSRT STKQIN };MOVE THE STARTING ADDRESS OF THE 
7088 13737 O40S42 O40544 MOV STKQIN, STKQOUT ; } QUEUE INTO THE INPUT & OUTPUT POINTERS. 
7089 Bess 127 900060 MOV aSTK KSRV, ast BTKVEC 5 FINI IALIZE THE KE VECTOR 
7030 0S76 0127. 0002 o0006e MOV 3” L 4 
cA nate 012777 etc 140326 nov 7100 asTKS + OT OLE TTY KEYBOARD INTERRUPT 
7093 BYDELE RTS Be < :;RETURN TO CALLER 
see ;*TK SE RVICE ROU ROUT INE 
70 j xTHI SERVICE THE TTY KE INTERRUPT 
7037 sagy & Peeeatna a Thar TEER FROM THE INPUT BUFFER AND PUTTING 
7099 :eIF T CE ARBETE R ONTROL — obit C) STKINT CALLED AND 
3100 + UPON RE URN EXIT fe RADE TO ONTROL-C" RESTART HERE SS (CTRHLT) 
7102 O40620 117746 140322 er MOVB aSTKB,-(SP) ;PICKUP_THE CHARACTER 
7103 ou0be4 Oe? 18 77600 BIC #40177, (SP) icon THE JUNK 
7104 O406 I 03 CMP (SP), #3 *:I1S IT A CONTROL C? 
7105 040634 001007 BNE i$ ;:BRANCH IF 
7106 040636 104401 041734 TYPE SCNTLC 37 TYPE A CONTROL-C (fC) 
710 ouObHe 4737 O40S50 ISR PC STKINT >: INI 1 THE KEYBOARD 
7108 46 005726 TST (SP)+ ;; CLEAN STACK 
7109 040650 0137 034570 IMP CTRHLT :;CONTROL C RESTART 
7110 o4 4 1627 000007 1S: CMP (SP), #7 5:18 IT A CONTROL G? 
7111 1004 BNE ::BRANCH IF NO 
71le@ O40662e 022737 000176 001140 CMP #SWREG, SWR ::IS SOFT-SWR SELECTED? 
gii3 040670 OO1S BEQ 6$ ::G0 TO SWR CHAN 
7115 040672 2S: 
7116 O40672 022737 oO00001 oO40S4O CMP #1, STKCNT ;;I1S THE QUEUE FULL? 
7117 040700 001004 BNE 3$ +:BRANCH IF NO 
7118 O40702 104401 001204 TYPE , SBELL ::RING THE TTY BELL 
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CZR6D8.P 02-0EC-77 10:00 TTY teeut ROUTINE — ae 
119 ome 005726 TST (spre lean CHARACTER OFF OF STACK 
1 i 000023 3s MP (SP), #22 IT A, ONTROL-S? 
g 140220 cLR asiks haya tty. KEYBOARD INTERRUPTS 
i 558 140212 31S: 1318 TKS Hed ORR GHAR 
100375 1$ THe Ghana rs THERE 
34 117746 140206 MOVB aSTKB,-(SP) ::GE 
740 2716 17 BIC #tC177, (SP) Sexe” it eit AserI 
2627 000021 CMP (SP)+, b21 31S ITA CONTROL 
4 Roy ad tEREENGOLE THY 
000100 140164 v #100, aSTKS ;;REE TTY KEYBOARD INTERRUPTS 
: 326 ANG TKCNT s REMY TER 
Bigree Bites? BiGTsS ' WEE «HERE OBB Rae 
774 000175 CHP CSP), #175 ett A SPECIAL CHAR? 
a oe a = Pree 
641806 48 ire 4S: vB f2p5¢ OSTKOIN 33 fran Soe 
101 37 42 INC STKQIN ; ;UPDA T pre 
O41016 1653 o40s42 040547 CMP SIKGIN, WSTKGEND ;; 
041086 ts 37 o4os4e o40S42 BOY BSTKQSRT,STKGIN ;; eT THE NO TER 
1034 02 SS: RTI $3 


vcocar eet arg 


TCH REGISTER CHANGE ROUT 
tS | Fie TEST FoR’ CHANGE. IN SoFTURRE SUITCH REGISTER TRAP 


RATING IN TTY INTERRUPT MODE . 


041036 2737 000176 001140 éecchr G, SWR 33157 p0bT-SHR SELECTED 
Oa ib4 1 $ XIT IF NOT 
1046 1057 140072 STB KS ::1S A CHAR WAITING? 
BiiGes {FPS yuop Bote Batkg,-ge) fi yeshots SAT 
Bui BEG 271 17? 606 ite iste: {35} t:MAKE_ IT 7-BIT ASCII 
041064 021627 CMP (SP), #? ::I1S IT A CONTROL-G? 
041070 001300 BNE Fx} ::IF NOT, PUT IT IN THE TTY QUEUE 


j SEMAESEREAESAEEERHERHEN SEHD TAT FROM ELIHER THE TTY INTERRUPT. 5 


NIN NNNN NN NNN NNN NNN 


ZONA SSHUEH LGR OW NOW £ UH ODD NOT £ vd OED VO Les hoe- EO NOU eae 


CON NTROL 1s pas on Tue TO ptt SPO POINT F ROM EIT TTY INTERRUPT SERVICE 
 *ROUTI SWITCH IS ER't CALL, AS A RESULT OF A 
* *CONTROL-G BEING T VBED AND Fen SOFTWARE SWITCH RA BEING Sere CTED. 
py1078 4297 7 001134 ooo001 6s: CHP B bee 33 WE NG I 
11 1674 Q $ ;;8R 
041102 57 TST (SP)+ ; CLEAR CONTROL - TACK 
tiie Cnr? rite Z 4 OS > ee a TTY KE OAR NTERRUPTS 
Bait is 12739 bdoo0t 001135 MOVB #1, Sintac riQL9 PA FERRUPT MODE fetta 
041122 104401 041746 TYPE » SCNTLG ;ECHO THE CONTROL-G (tG) 
041126 04401 041753 SGTSWR: TYPE MSWR ; TYPE CURRENT CONTENTS 
04113 13746 000176 MOV saRee -(SP) t:SAVE SWREG FOR TYPEOUT 
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02-DEC-77 10:00 TTY INPUT ROUTINE 
TYPOC ;;GO TYPE--OCTAL ASCII(ALL DIGITS) 
5125 Bat tas 1OaoT 041764 TYPE , SMNEW tt FOR NEW SWR 
7158 Oat ive siege ctr -(8P) A ae ee 
7 137770 7$: TB asTKS +: CHAR 2 
7180 owiiss 100375 BPL 7$ ::IF NOT TRY AGAIN 
764 vB a$TKB,-(SP) :;PICK HAR 
Al By} 128 ba25 78 1337 BIC acto, (ep) tt MAKE YF ee ASCII 
oo000 ),* ::IS IT A CONTROL-C? 
at a ta 1 Be. Kewnuc HIGBONCH IE BT aay 
518s Bait 1 1 041734 CNTLC jiYES, E CONT -C (#0) 
7185 641204 508 ll 000001 chee sFaFhic, a fIREERABLE Fry KEYBOARD INTERRUPTS? 
1 lel2 1003 ; s BRANC 
77 0, a@STKS ee TT INTERRUPTS 
7138 Buts43 BASTSS 899498 197722 4. | RE RHRE S iAP H ol 1X KELFRRFO 
ae 041226 021627 oD00e5 Qs: CMP (SP), #25 ;;1S IT A CONTROL-U? 
5138 641839 do8? o41741 ee Bauru 5 ERAN CH TE NOt TROL-U ctu) 
7198 041240 000006 20$: ADD ke, SP ;; IGNORE PREVIOUS INPUT 
7498 041244 000737 19$ ::LET’S TRY IT AGAIN 
7201 
7202 oo00 10$ CMP (SP), #15 ;;I1S IT A_<CR>? 
7203 oat apr ” 163 ” :: BRANCH IF 
7204 Ouiess 005766 oo0004 Tot 4(SP) ii YES, Is IT vate FIRST CHAR? 
7208 pS Ou 1b * 16677 002 137650 MOV 2(SP), aSWR i; SAVE NEW Suh 
$508 O4isey TBG4DR Bo036 tig: 0D, MRR bE EREOR oR) AND. <LF> 
7209 b41So0 oa7e4 O01 136 000001 ; cHPs SINTAG, #1 : ?RE-ENA LE TTY KBD INTERRUPTS? 
5510 Ba t308 o61053 000100 137626 MOV 4780, asks ?RE-ENABLE TTY KBD INTERRUPTS 
7212 131 1S$: RTI : RET’ 
7213 041326 4 O1 16$ ISR PC, STYPEC 7EC CHAR 
o5t3 1 1627 ate 6 CMP (SP), #6 He < 0? 
7215 O41330 O02e420 BLT 18 ::BRANCH IF YES 
7216 1336 O538i5 000067 CHP (SP) , #67 3} CHAR > a os 
$5t6 pt AP 0060 Bfc #60, (SP)+ ii Baancn Ie ASCII 
7219 041344 005766 o00002 TST 2(SP) ::1S THIS THE FIRST CHAR 
? 1 4 BEG 178 jj BRANCH FY 
555? 41382 B58 1 L (SP) ;;NO, IFT PRESENT 
7222 1354 OOESIE ASL (SP) 7: "CHAR OVER TO MAKE 
7223 041356 006316 ASL (SP) :? ROOM FO WW ONE 
7224 041360 O0S266 oo2 178: INC 2(SP) ::KEEP COUNT OF CHAR 
sess Bulse Bane 177778 I: ieee a cs 
7227 7 44 10 18S: TYPE SQUES ti TYPE ?<CR><LF> 
a4 Dui acE bod7e0 — 20s :;SIMULATE CONTROL-U 
7229 .DSABL LSB 


Ell 
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CZR6DB.P 02-DEC-77 10:00 TTY INPUT ROUTINE 

7 

7 33 ppneqnoueenessonssegucessesesnse see ts saan he te 

7233 jATHIS ROUTINE WILL INPUT A SINGLE CHARACTER FROM THE T 

7235 +4 ROCHR ;;GET A CHARACTER FROM THE QUEUE 

7236 :# RETURN HEPE ::CHARACTER IS ON THE STACK 

7637 ie tiWITH PARITY BIT STRIPPED OFF 

7239 ‘ 

7240 O41400 011646 SROCHR: MOV (SP), -(SP) ; ; PUSH THE PC AND 

7 1402 016666 o00004% oD000e MOV 4(SP},2(SP) 35 THE 

7 1410 S066 000004 CLR 4(5P) ::GE ADY FOR 8 CHARACTER 

? 1414 CLR -(5P) : PUT Ren PS ON STACK 

7546 1438 041424 nov #64S,-(SP) 5 PUT NEW pC On BIACK 

7 14 64S: Re ‘ 

seu? ive4 737 o040S40 1$: TST STKCNT ;;WAIT ON A CHARACTER 

3548 1432 37 o40s40 DEC TKCNT $3 ars NT THE COUNTER 

7250 1436 bb 17710¢ oo00004 MOVB o$TKQOUT, ,4(SP) CHARACTE 

7251 1444 bdeS 0544 INC $ KQOUT ot THE POINTER 

7252 14S0 023727 O40544 040547 CMP TKQOUT, nee’! T OFF OF THE END? 

7253 1456 901003 BNE a 3 Hy NO 

7254 14 012737 O40S46 O40S44 MOV TKQSRT, STKQOUT’ ; ;RESET THE POINTER 

7255 1466 000002 RTI T 

7 ; Ss sepestrteeseneuscousennnenensditereternenerennnenececetereceee 

7e57 jATHIS: ROUTINE WILL INPUT A STRING FROM THE T 

ae i BOE RN HERE + Ne tese BBR test CHARACTER. WILL BE ON THE STACK 

seb) 1% + TORR TRA TOR WILL BE A BYTE OF ALL O'S 

7263 041470 010346 SRDLIN: MOV R3,-(SP) 5 SAVE R3 

7264 OuiNZe ooso46 CLR (SP) 3Ge RUBOUT KEY 

7265 1474 012703 041724 1$: MOV SSTTYIN R3 AR DRESS 

7e6 Out oo o e703 041734 2s: Ch aSTTYINGS., R3 UBT FULL? 

7268 OuisoN i146 ROCHR He BS READ CONE CHARACTER FROM THE TTY 

7269 1 19 1 e613 MOVB (SP)+, (R3) eer CHARACTER 

7 151 13 000177 10S: CMPB #177, (R3) 3 Ge IT A RUBOUT 

7271 1516 1022 BNE og :;BR IF NO 

2 ze ou i852 7 g Tot (SP) 731 THIS THE FIRST RUBOUT? 

La out 116737 900134 041722 nove #’\,9S :: TYPE A BACK SLASH 

7276 pu tese 12716 177777 MOV b-1, (SP) ;;SET THE RUBOUT KEY 

7277 guise 303 6$: DEC R3 > :BACKUP BY ONE 

7678 1ba4 be032” 041724 cH Ra, #STTYIN $s BIMEK EMPTY? 

7880 Biles 1 1337 041722 move (R3) , 9S j }SETUP TO TYPEOUT THE DELETED CHAR. 

7282 1 doo746 BR $ i #60 READ ANOTHER CHAR. 

7283 O41S64 005716 S$: TST (SP) *RUBOUT KEY SET? 

7284 1 001406 BEQ 7§ 

7285 041570 112737 000134 041722 MOVB #°\,9S me! A BACK SLASH 

7286 O41576 104401 041722 TYPE 9S 


— ——— -——-— - - — - - a TELS 


CZR60B0 RK611 OSKLS CTRL PRTY MACYI11 
CZR6DB.P11 02-DEC-77 10:00 

7287 ow ae te 

7 161 

z i 1 041741 

7 1 gee oootee 

7233 ulbew Ob1011 

7 1 1 “1 lell 

faze Duley iGwol OHize4 

fea uleNe 0440) oo1zi0 

7300 16) lll 041722 

Zouk 16854 1 i 041722 

7 1660 27. 1s 

7303 ules Ob1908 

7305S 1 O01 OO0lel2 

73 ule7e Ooe7es 

ee ire bieee 

730 041704 1866 oooo004% ooo00e 

7310 17le 12766 041724 o00004 

7311 1763 000062 

gals 1722 000 

731 1723 000 

7314 0417 000010 

7315 Hee 041536 heat 000 

7316 1741 136 O06S 000012 

7317 O4%1746 O43536 O0OS0I1S 000 

7318 a ea 01S OSi4le 051127 

7318 GHi7eh o3etad GogN Oo” 

73e1 Bui see 020075 000 

73¢ee2 041776 

7323 

7324 

7325 

7326 

7327 

7328 

73293 

7330 

7331 

7332 

7333 

7334 

7335 

7337 O41776 O11646E 

7338 200 016666 000004 9000002 

7339 O4e006 O10046 

7340 O42010 O10146 

7341 QO4e0le O10e46 

7342 O4e014 I1OH44H11 


-DEC-77 10:20 PAGE 135 


30(104%6) 02 
TTY INPUT ROUTINE 
CLR (SP) 
7$: CMPB #25, (R3) 
BNE 8s 
TYPE SCNTLU 
BR {s 
8s: CMPB #22, (R3) 
BNE 3$ 
CLRB (R3) 
TYPE , SCRLF 
TYPE STTvIN 
BR té‘iéR®’ 
4$: TYPE SQUES 
BR is 
3$: MOVB (R3), 9S 
TYPE ag 
CMPB bis, (R3)+ 
Bree -1(R3) 
TYPE SLF 
TST tSP)+ 
MOV (SP)+,R3 
MOV (SP) ,-(SP) 
MOV 4(SP$,2°SP 
MOV aSTTYIN, 
RTI 
9$: -BYTE O 
‘BYTE O 
STTYIN: .BLKB_ 8. 
SCNTLC: 3353 aay: 
SCNTLU: .ASCI 74U7615><¢ 
CNTLG: .ASCIZ 7#G/7<15>< 
: IZ <«15><1l2>7 
GMNEW: .ASCIZ 7/7 NEW = 
. EVEN 


Hi: fue INPUT STRING 
mat ANOTHER CHACTER 


Hi Glene THE BUFFER AND LOOP 
::ECHO THE CHARACTER 


; ;CHECK FOR RETURN 
:LOOP IF NOT RETURN 
i2CLEAR RETURN (THE 15) 
s;TYPE ALINE FEED 
CLEAN RUBOUT KEY FROM THE STACK 
i TRESTORE R32 
;;ADJUST THE STACK AND PUT ADDRESS OF THE 
FIRST ASCII CHARACTER ON IT 


tt Sforace FOR ASCII CHAR. TO TYPE 
; j TERMINATOR 
i RVE B BYTES FOR TTY INPUT 


3c 
; | CONTROL pe 


;;CONTROL “G” 


-SBTTL READ AN OCTAL NUMBER FROM THE TTY 
= 3 36 3-36 AE 36 HE SE HE 0S 0 HH HE EEE 


i aF LLOWED BY A 
; #CAL Ls 
;* RDOCT 
RETURN HERE 
SROOCT: MOV (SP) 
MOV 4 (SP 
MOV RO,- 
MOV R1l,- 
MOV Re,- 
1S: ROLIN 


i ATHIS ROUTING WILL READ AN OCTAL (ASCII) NUMBER FROM THE TTY AND 


HARACTERS WILL BE CHECKED TO INSURED THEY ARE LEGAL 
AN GAL _ CHARACTER IS READ ILL B 


et E Tyre? 
THE COMPLETE NUMBER M 


;;READ AN octet, NUMBER 
;;LOW ORDER BITS ARE ON TOP OF THE STACK 
;;HIGH ORDER BITS ARE IN SHIOCT 
3} PROVIDE SPACE FOR THE 

INPUT NUMBER 


BUSH RO ON STACK 


IN STACK 
TREAD AN ASCIZ LINE 


SES 0135 


genepeo RK611 Bake .c 


NNN 


NNNNNN 


ie | 
PP stsspeseps poops eps o pp ppd 


NNNNNN 


esi 


es 


RAISE 


rurerurororururorurury: 
Oe be ae be be ae pe pe 
RR LNOrcwOR 


CTRL PRTY 


77 10:00 


ooooEc 


48 000067 


001210 


MACY11 8 


cAB"BA ottaLe cr 10:80 THE ck =e8 Gre 


(SP)+,R0 +3 BF sa OF 1ST CHARACTER 


ok RV’ ONO aR bara. WORD 


Re 
2s: MOVB (RO)+,-(SP) Prcas THIS CHARACTER 
BEO 3¢ ie ER T 
CMPB #’0, (SP) SURE ty Ss CHARACTER 
BGT 4g eee AN OCTAL DIGIT 
CMPB #’°7, (SP) 
BLT 43 
ASL R1 3382 
ROL Re 
ASL 1 3; 
ROL Re 
ASL RI ;;*8 
ROL Fo 
BIC atc? (SP) ;;STRIP THE ASCII JUNK 
BOD cop P)4+,R ys: IN THIS DIGIT 
3S: TST (SP)+ CLEAN HEP ENATOR FROM STACK 
MOV R1,12(SP) 
MOV Re’ $HIOCT 
MOV (SP)+,R2 qpeme TACK INTO Re 
MOV (SP)+/R1 : SBOP TACK INTO RI 
nov (5P)+;RO :POP STACK INTO RO 
4§: TS (SP)+ s RE TUR PARTIAL FROM STACK 
CLRB (RO) ::SET A TERMINATO 
TYPE :: TYPE UP THRU THE BAD CHAR. 
S$: .WORD O wi E 
TYPE $QUES i7e CR” & “LF* 
R { :TRY AGAIN 
SHIOCT: ‘HIGH ORDER BITS GO HERE 


WORD O 
.SBTTL SAVE AND RESTORE RO-RS Rbittaes 
lt gr ee aeaemaaa enemies amma natritee 


jkSa RO-RS 
*CALL: 

SAVREG 

! XUPON RETURN FROM SSAVREG THE STACK WILL LOOK LIKE: 

i ETOP---( 416) 

# +2---(4+18) 

1 +4---R5 

3% +6---R4 

;# +8---R3 

;#+10---Re 

;*+12---R1 

:¥+14---RO 

SAVREG: 
MOV RO, -(SP) ;;PUSH RO ON STACK 
MOV R1;-(SP) i} R1 ON § 
MOV R2;-(SP) ;;PUSH Re ON STACK 
MOV R3,-(5P) :$PUSH RG ON STACK 
MOV R4;-(SP) ;;PUSH R4 ON STACK 


CZR60B0 RK611 OSKLS CTRL PRTY MACY11 30(1046) O2-DEC-77 10:20 ore 137 SES 0137 


CZR60B8.P11 02-DEC-77 10:00 SAVE AND RESTORE RO-RS ROUTINES 
rae BABIES BLESS coonee roy BSL ap, HEU OS OY 
fib) iste GIEEME SHBRSs Rey Seiaessctee) ERE Be Be BUD FU 
7403 gigs O166H6 oood22 Hoy 22(SP);-(SP) :;SAVE PC OF CALL 
74 
a ; *RESTORE RO-RS 
74 ;*#CALL: 
7408  y RESREG 
auto ee 012666 00022 SRESREG: (SP)+, 22(SP) RESTORE PC OF CALL 
741 2200 12666 000022 MOV (SP) +) 22(SP) ti RESTORE PS OF CALL 
741 82 12666 000022 MOV (SP)+,28(SP) ; REST PC OF MAIN FLOW 
puta BNSSta BrsEBs Ore HOV Ce ee eT INTO RE 
7415 O42216 012604 MOV (SP)+;R4 ::POP STACK INTO RY 
741 2220 012603 MOV (SP)+'R3 : POP STACK INTO R3 
at is my GSesSBp HIRE STREK IND 
oat 555e Bise MOV {3p} 3° RO POP eT Ack iNt8 Ro 
paeo 042230 o00002 RTI 
rue _SBTTL POWER DOWN AND UP ROUTINE 
oise s3 SKREKKKRAHAARAKAARARRAREASRAAKREKRARRARRERRRAKRARAAHSRAAAAKAAAKREE 
ouse 042232 017737 136702 903312 ipORDN: Oo Ue AVSHR ;SAVE SWITCH REGISTER 
74 4 RV :SET UP VECTOR 
ous Bussue 18535 ponsGe BHdosE Mov SPURL Pury F 
7430 O42254 Q00000 HALT 
7431 042256 000776 BR --2 ;HANG UP 
7435 a4 REKKAEKKARAKEEA LEAL SSKSASAA KARA ARAKA AAA LARA LASARAKAA KARA HLLA EELS 
74 POWER UP ROUTINE 
738 B260 g0s037 042354 éPURUP: CLR SPWRCT ;LOAD WAIT COUNT 
743 2264 012737 OO0144 oO42356 MOV #100. , SPWRCT+2 
7438 ee7e 005237 042354 1S: INC SPHRCT ;WAIT FOR TELETYPE 
7440 37 042356 DEC SPwRCT+2 
7441 1 ie BNE 1$ 
7442 i o42232 o00024 MOV #SPWRDN,PWRVEC ;SET UP FOR POWER DOWN VECTOR 
7443 042314 012737 OO034O o000c6 MOV #PR7 , PWRVEC+2 
7444 ouesee 016706 1100 MOV asTaAck, SP jFORCE STACK 
ant 4 Oe , 4? 5 Gace yor ; ae ‘RCTNIT ALIZE MEM CK ENABLE 
oue ues Bt3772 62318 _—s MOV SaVSHR, gun te “ffl H REGISTER’ BASE 
7449 042350 000177 136532 IMP SELPAOR ;GO BACK’ 5 INST Atee af 
7451 042354 o00000 oD0000 SPWRCT: .WORD ; TELETYPE TIME OUT 
rabe 042360 047520 O42527 000122 S$POWER: -ASCIZ OP OWER/ 


-EVE 
74S4 .SBTTL TRAP DECODER 


CZR&DBO RK611 DSKLS CTRL PRTY MACYIL1 30(1046) O2-DEC-77 10:20 PAGE 138 SES 0138 
CZR6DB.P11 02-DEC-77 10:00 TRAP DECODER 

74 

eee $3 KEELEELSKEAKREKEPX KAA LALA ASE REAR EE RRA SHARELLELEHFEREKKRELERALE REESE 

7457 :&THIS ROUT INE WILL PICKUP THE LOWER BYTE OF THE “TRAP” INSTRUCTION 

ruse :#AND USE IT TO INDEX THROUGH THE TRAP TABLE FOR THE STARTING ADDRESS 

745 :#OF THE DESIRED ROUTINE. THEN USING THE ADDRESS OBTAINED IT WILL 

7460 :#GO TO THAT ROUTINE. 

7462 042366 010046 STRAP: MOV RO,-(SP) ;;SAVE_RO 

7463 370 16600 oo0002 MOV 2($P),RO :3GET TRAP ADDRESS 

7464 Tn 4 TST -(RO) $3 a 4 BY § 

oubs O4e376 411906 move (RO), RO :GET RIGHT BYTE OF TRAP 

ouee Busupe yaaa o42422 MOV STRPAD(RO) ,RO i tND TO TABLE ™ 

eae 042406 000200 RTS ::GO TO ROUTINE 

7470 

each ;;THIS IS USE TO HANDLE THE “GETPRI” MACRO 

7473 O42410 O116 STRAP2: MOV (SP), -(SP) ;;MOVE THE PC DOWN 

7474 O4e4l2e O16666 o00004 oD0002 MOV 4(SP5,2(SP) ::MOVE THE PSW DOWN 

gaze 2420 0000 ?:RESTORE THE PSW 

ne .SBTTL TRAP TABLE 

7479 ;*THIS TABLE CONTAINS THE STARTING ADDRESSES OF THE ROUTINES CALLED 

7480 :"#BY THE “TRAP” INSTRUCTION. 

7482 . ROUT 

7483 : ROUT INE 

7484 O42422 042410 $TRPAD: . AP2 

7485 ees 037604 $TYP ; ;CALL=TYPE TRAP+1( 104401) TTY TYPEOUT ROUTINE 

7486 4 o40112 STYPOC +;;CALL=TYPOC RAP+2(104402) TYPE OCTAL NUMBER (WITH LEADING ZEROS) 

7487 2430 O4OOB6 $TYP ::CALL=TYPOS TRAP +3( 104403) TYPE OCTAL NUMBER ( LEADING ZEROS) 

7488 2432 0126 STYPON ;:CALL=TYPON TRAP+4( 104404) TYPE OCTAL NUMBER ( R LAST CALL) 

7489 042434 040314 STYPLS };CALL=TYPDS TRAP+5(10440S) TYPE DECIMAL NUMBER (WITH SIGN) 

canbe 042436 041126 SGTSWR ;;CALL=GTSWR TRAP+6( 104406) GET SOFT-SWR SETTING 

7493 2440 041036 SCKSWR ;;CALL=CKSWR TRAP+7(104407) TEST FOR CHANGE IN SOFT-SWR 

7494 e442 041400 RDCHR ;;CALL=RDCHR TRAP+10( 104410) TTY TYPEIN CHARACTER ROUTINE 

7495 O42444 041470 SRDLIN :;CALL=RDLIN TRAP+11( 104411) TTY TYPEIN STRING ROUTINE 

7496 2446 041776 SROOCT };CALL=RDOC RAP+12(104412) READ AN OCTAL NUMBER FROM TTY 

7497 O4e4S0 21 SAVREG ;:CALL=SAVREG TRAP+13(104413) SAVE RO-RS ROUTINE 

7498 040452 042174 SRESREG ::CALL=RESREG TRAP+14(104414) RESTORE RO-RS ROUTINE 

7499 042454 035302 OP1$ ::CALL=SCOPI TRAP+15( 104415) INTERNAL LOOP ON ERROR 


CZR&0B0 RK611 OSKLS CTRL PRTY MACYI1 30( 1046) 


C2R6DB8.P11 Oe-DEC-77 10:00 


bosib 


pI SSPSR A ESSE 


03 4 42 
1 
003222 
3200 
24 
14s 03220 
003200 


3 


ainiatatatalatat atta 
SRB Nerin eit 
5 





ee 
00111 
ree Oo1T1e 903200 
755 3138 
7 1 osS200 
7528 SS 1318 003200 
75e3 O4e 00321 003150 
«ES Osert ies bossig 
| Fh Bere ite 0 
75 2730 34 
7534 ee OE oon 
ee 
7537 Boe rat a 
144 003202 
7539 OSoo5 003220 003160 
7540 GNe77e ae 
7S42 043010 


Braue: 


DTOO3: 


DTOY1: 


DTO46: 


DTOS1: 
DTOS2: 
DTOS3: 
DTOS4: 
OTO71: 


OTO74: 


DT077: 
DT134: 
DT144: 


DT1S1: 


O02-DEC-77 10: 
DATA TABLE FOR PRINT OUT 


-SBTTL DATA TABLE FOR PRINT OUT 


- WORD 
. WORD 
. WORD 


. WORD 


. WORD 


. WORD 
. WORD 
» WORD 
. WORD 
. WORD 
“WORD 
. WORD 
. WORD 
. WORD 


. WORD 


. WORD 


STESTN, 
TESTN; 


STESTN, 


STESTN, 


STESTN, 


STESTN, 
STESTN, 
STESTN, 
STESTN, 
STESTN, 
VRCHOR, 
STESTN, 
STESTN, 
STESTN, 
STESTN, 


E.BA,T. 


STESTN, 


20 PAGE 139 SES 0139 
TRAPPC 

SERRPC,E.MR1,T.MR1,P1.B17T,PR.BIT,M1.BIT,Me.BIT,BITCNT 
SERRPC,E.CS1,7.CS1,E.MR2,T.MR2,E.MR3,T.MR3 


SERRPC,E.CS1,7T.CS1,E.CS2,T.CS2,E.ER,T.ER,E.BA,1T.BA,E.WC,T.WC 


SERRPC,E.CS1,7.CS1,E.CS2,T.CS2,E.ER,T.ER 


SERRPC,E.08,7T.08,WROCNT 
SERRPC,E.CS1,T.CS1,1T.CS2,T.ER 
SERRPC,E.MR1,7T.MR1 
SERRPC,E.OCYL,T.OCYL,E.DA,T.DA 
SERRPC,E.CS1,1T.CS1,E.CS2,T.CS2,E£.ER,T.ER 
VRCHOR+2 , VRCHDR+4 
SERRPC,E.CS1,7T.CS1,E.CS2,7.CS2,E.ER,T.ER,HDRCNT 
SERRPC,E.MR1,1T.MR1,HORCNT 
SERRPC,E.ECPT,T.ECPT,BITCNT 
SERRPC,E.CS1,7T.CS1,E.CS2,7T.CS2,E.ER,T.ER 


BA,E.WC,T.WC,E.DCYL,T.OCYL,E.DA,T.DA 


SERRPC ,£.ECPT,T.ECPT 


EFREDE ei” BStbecc7> ibs oe 


a3 
Sa 
888 
ais 
ie 
8 8 


gS Himes OMB ooo 

044103 
oe 
ee 
a ig 
fees Hiss ca 
a i 
A 


7569 044065 00 
7570 000 ooo 
Fash BES ONES oop 
Fe I nee 

Fase BSI wee — 20 
7s 11 ooo 
ee atts oon 
ft: alle O60 000 
ce a 
regs BY 158 on Bab 000 
7585 ates 044675 

7586 3134 000 
7587 ustae 044752 

7588 3140 0 000 
7589 O4314e O4S011 

7590 Ratioe 00 000 
a eg 
a 
7595 Bisiee 044103 

7596 043160 00: 000 
7597 O4316e O44616 

7598 043164 0 000 


MACY11 30(1046)~ O2-DEC-77° 10:20 PAGE 146 - 
DATA FORMAT FOR PRINT OUT 


.SBTTL 
DFOOO: 
OF O02: 


DFOO3: 


OFOeS: 


DFO41: 


DATA FORMAT FOR PRINT OUT 


-WORD 1 
-BYTE 2,0 
WORD 5 
BYT 


cf 


r 


b+] 
< 
+ 
my 
(=) 
oO 


: DHOo28 
-BYTE 7,0 
S ;ERROR 3-24 
BYTE 0,0 
we Bigoos 
BYTE 2,0 ~ 
pe em 
WO! DAHO03B8 
BYT ,0 
WORD . ;ERROR 25-40 
* BYTE BAROOA 
“WORD OHAO00B 
"BYTE 2,0 
WO DHOesA 
BYT 0 
: 258 
BYT 8,0 
“BYT 0.0 
“BUTE 0,0 " 
“BYTE 2 = 
DHO41A 

BYTE 0,0 
; WOR DHO418 
‘BYTE 6,0 
‘WORD DHO4IC 
“BYTE 0,0 
"WORD DHO4ID 
BYTE 4, 
WORD 5 

YTE 0,0 
WORD DHOODA 
BYTE 0,0 
WORD DOHO0OB 
BYTE 2,0 
WORD DAOY1A 
BYTE 0, 


SEG 140 


oes 3170 
7600 a 
feos Bale 
7ebe Buses 
7608 13 
708 fils 
7611 “3216 
7ble 3220 
7613 2e 
14% 
Zi : 3 
1 
7617 3232 
Zeie 3234 
76 


See 
PEPEPEPEPIS 


SORT 


7625S 

7 

cose 358 
76. 3264 
reat 3266 
es Bier 
He Bere 
cous 043300 
re Blas 
7639 043306 
7640 RTE 
7eNe 4331 
764. 14 
764 3316 
7644 


aaa 
pee 
22922299299 
sognapeaan: 
ERSRIREO RE 





CTRL PRTY 


EfRebe.PLl. besbecs7? 10: 


044675 


DFOSL: 


OF OSe2: 


DFOS3: 


DFOS4: 


DFO71: 


; ERROR-S4-61 


;ERRORS 71-73 


SES 0141 


SEG 142 


M11 
) O2-DEC-77 10:20 PAGE 142 
MAT FOR PRINT OUT 


1 
TA F 


MACY11 30¢ 
DA 


CZR6080 RK611 OSKLS CTRL PRTY 
02-DEC-77 10:06 


CZR608.P11 


eee 


S888888888888 8 


Prrte 


Shi pees eee 


4555448464508558585880550585 408 


SOBER SARRSERS 


2 oBobaber 


=—O-0 


MNDOOSUGGSMN 


_ 
Preteerty 


COMUNE DN DEO 
Biood S00 50000 


& 


UT LENT OBN 00 
eeeeteeetees 


rer 
> 
a 


= 


So 
=a 


ae 


q 2 
Boies 


IO eI sr -zr 


H 


oo-—Wmo0oo0owWooaM 
herererererercraercr eter 
aSnShSnSalnaLasasasasa 

~ 

w 

oH 

re 

a 


N1l 


Cc RK611 psx CTRL PRTY MACYI1 30(1046) O2-DEC-77 10:20 PAGE 143 SES 0143 
Cc -Pll -DEC-77 10:00 ASCII MESSAGES 

£708 -SBTTL ASCII MESSAGES 

718 p0501s $See iss OPROOI: .ASCIZ <15><12>/RK611 BUS ADDRESS ( / 

771 1 1104 “808 

7714 44 

zie 32 1 0200 OPROO2: .ASCIZ 7) = 7 

get : .ASCIZ /RK611 VECTOR ADDRESS ( / 


es 
saa 
5295 
ze 
ey 
‘ 
: 


Ol 
23 
O83133 1 OPROOY: .ASCIZ /RKE11 PRIORITY ( / 
at 1117 


1 
77 3614 5 
a4 >| il 31 020050 
oe 1 ges05e OPROOS: .ASCIZ <15><12>/#"""% PROGRAM HALTED *####/<15><12> 
7728 yy 1 ll 
77 4 
ae a a ll Oie108 
a | ° 1 OSiiie 1S0S OPROOG: .ASCIZ <15><12>/SECOND PASS RUN TIME IS APPROX 3:15 MINUTES’<15><12> 
5534 3528 1 1040 at 
3735 1 651 D105 
5538 7, O3 1 peedey 
77. 7 1 O464 047111 
3238 Ou a7e OSe125 051505 oos01S 
7741 Byszer 040 SPACE2: .ASCIZ 7 / 
7742 043754 is 1120 043517 ABORT: .ASCIZ <15><12>/PROGRAM ABORTED BECAUSE ERROR THRESHOLD EXCEEDED/<15>< 12> 
7743 37 OSee 020115 041101 
7744 37 4ike Os 20104 
7745 37 051525 
ore 4004 O201 05110S 047522 
774 odds 0201 outed 042522 
7748 O44D. o44ie 6117 020104 
gree awsen Bicibe foesie *d05 
7781 ear O15 O52018 051505 TSTBY1: .ASCIZ <15><12>/TEST / 
5585 044051 O40 oOS4YS02 oO40S20 TSTBY2: .ASCIZ / BYPASSED’<15><12> 
7754 O440S6 051523 O42105 o0S015 
7755 O44064 00 


c RK611 OSKL |e sap MACY11 30(1046) O2@-DEC-77 10:20 PAGE 144 
c -Pil BS becc7> DATA HEADERS ve tee 


-SBTTL DATA HEADERS 
DHOOOA: .ASCIZ /TEST ERROR/ 


DHOOOB: .ASCIZ /NUM PCs 
DHOOOC: .ASCII /TEST TRAP/<15><12> 


-ASCIZ /NUM PC/ 
DHOO2A: .ASCIZ /EXPECT ACTUAL PRESENT PRESENT PRESENT PRESENT BIT/ 


DHOO2B: .ASCIZ /RKMR1 RKMR1 BIT+1 BIT BIT-1 BIT-2 COUNT’ 


DHOO3A: .ASCIZ /EXPECT ACTUAL EXPECT ACTUAL EXPECT ACTUAL 


DHOO3B: .ASCIZ /RKCS1 RKCS1 MESS A MESS A MESS B MESS Bv 


DHO2SA: .ASCIZ /EXPECT ACTUAL EXPECT ACTUAL EXPECT ACTUAL/ 


DHO2SB: .ASCIZ /RKCS1 RKCS1 HOD WO 1 HD WO 1 HD WD 2 HD WD 2- 





CZR6DB0 RK611 OSKLS CTRL PRTY MACYI1 30(1046) O2-DEC-77 10:20 PAGE 14S SEO 145 
CZR60B8.P11 O2-DEC-77 10:00 DATA HEADERS 
1 
8 sf 
14 1 
i$ 104 
re 
DHOY1A: .ASCIZ /EXPECT ACTUAL EXPECT ACTUAL EXPECT ACTUAL/ 
1 41 
i 1501 
DHO41B: .ASCIZ /RKCS1 RKCSI RKCS2 RKCS2 £RKER RKER/ 
7 
7 


DHO4Y1C: .ASCIZ /EXPECT ACTUAL EXPECT ACTUAL/ 





7637 S105 

z 0 

cA 101 

7841 101 OHO41D: .ASCIZ /RKBA RKBA RKWC RKWC/ 
784 111 

784 

7844 


7 


- 
Oo 


3,77 
O4SO46 020040 DHOSIA: .ASCIZ /DATA DATA WORD/ 
ents Buges? 
7 
Z 5 DHOSIB: .ASCIZ /EXPECT READ COUNT/ 
7681 O481 Budeoe 
7852 106 O20 041440 
7853 114 33 7 000 
7854 121 1 1 O41 DHOS2A: .ASCIZ /EXPECT ACTUAL’ 
7855 1 1 
7856 045134 4 


DHOS2B: .ASCIZ /RKCS1 RKCS1 RKCS2 RKER/ 


N aaa 
atatntaty| 
-_ N 
Raa 
wm 
be he he 
OWLS 
_ 
=e 
Bz 
OoOnw~ 


DHOS3A: .ASCIZ /EXPECT ACTUAL 


Es 
e 
Be 


DHOS3B: .ASCIZ /RKMRL RKMR1/ 


NNNN 

oe 

AS a 
He 
£ 

fu 

5 

<= 

es 

ron 

aw 

=2 

~ 

— 

ue 


N 
@ 
o 
N 
o 
£ 
wn 
(or 
Sn 
o 
o 
Oo 
r 
‘= 


CZR6DB0 RK611 OSKLS CTRL PRTY MACYII 30(1046) O2-DEC-77 10:20 PAGE 146 SES 0146 
CZR608.P11 02-DEC-77 10:00 DATA HEADERS 


7868 pY5232 054105 O¥e5e0 052109 DHOSHA: .ASCIZ /EXPECT ACTUAL EXPECT ACTUAL 


DHOS4YB: .ASCIZ /RKOCYL RKDCYL RKDA RKDA/Z 
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R6 02-DEC-77 DATA BUFFERS 
4 140000 .WORD 140000 
oee3 760 4 “WORD 140040 
Bsee OSu7ed 140000 “WORD = 140000 
8866 [wORD 140040 
“WO 14 5 
Bee9 “Word 140040 
8871 “HORE 1 5 
7 “WORD 140040 
887 “WORD 
8874 “WORD 140000 
8875 “WORD 140040 
8878 WORD 140040 
8s * 
8880 WORD 140000 | 
8881 "WORD 140040 
Bese “WORD 040 | 
88 “WORD 140000 
ggs4 “WORD 140040 
88s “WORD 040 
ces feat eh 
88 “WORD 0 
Be Bae hee 18 hee 
8891 boopse “WORD bdoo4e 
88 5052 140000 7wORD 140000 
4 14 40 ‘WORD 140040 - 
ay 4 * WORD 040 
889s 140000 “WORD 140000 
40040 ‘WORD 140040 
B89 y My . WORD 
3838 14 "WORD 14 
88 40040 "wORD 140040 
8900 booo49 “wORD Ooo0o4 
890 74 140000 “WORD 14000 
40040 - HOR 14004 
i 40 “WO 
8304 51 “wORD 140000 
OS 0551 140040 "WORD 140040 
8308 3108 40 "wORD O09004 
11 [WORD 14 
e908 055112 140040 "WORD 140040 
8909 055114 40 "wORD 000040 
8910 B116 140000 “wORD 140000 
8911 0551 140040 "wORD 140040 
8912 055122 40 "wORD OO0040 
913 O551e4 140000 "woRD 140000 
14 055126 140040 “WORD 140040 
8915 055130 Oo0040 "WORD Oo0040 
8916 055132 140000 ‘wORD 140000 , 
8917 055134 140040 "WwORD 140040 
| 
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SSsis SESS 


cc eee 


He 


nee 


Ore 
oe 


Snot 
OWW 


VRCHDR: . 


P.*] 

Oo 
NE 

One 

Ge 


27777 MODeBF: 2777 , 177777 , 177777 , 177777 , 177777, 177777 


Bure: -BLKW 400 
esese CCBUF: [WORD 125252, 125252, 125252, 125252, 125252, 125252 
27777 .WORD 125252, 125252, 177777, 177777, 177777, 177777 


Xaaaas ~, WORD 177777 , 177777, 177777, 177777, 000000, 000000 
000000 , 000000 , 000000 , 000000 , oc00c0 , Oo0000 
. WORD 052525, 052525, 052525, 025252, 052525, 052525 


: 


7 
> 
2 





SERUReEI TELE UUE UA TESS TESST PERE 





1 i" -WORD 052525,05252S, 121105, 150442, 064221 , 132110’ 
ie 31 -WORD OSSO44,026422,013211, 105504, 042642, 021321 
peshs -WORD 110550,044264,022132,011055, 104426, 042213 
igceee -WORD 133333, 066666, 155555, 155555, 133333, 066666 
155555 -WORD 066666, 1SSSSS, 1SSSSS, 133333, 133333, 133333 

33333 -WORD 133333, 133333, 133333, 133333, 177777,177777 ; 
aeoces -WORD 177777,0S5252S,0S2S2S, 052525, 177777, 177777 
Afr ore -WORD 052525,052S2S, 177777 , 052525, 1772Se2, 177252 
Osetss 1 1a 07 507 -WORD 172765, 172765,072307, 135143, 156461, 167230 
peelee 07351 Beeres -WORD 073514,035646,016723, 107351, 143564,061672 
030733 : voae te -WORD 030735, 1143S56,046167, 123073, 151453, 164616 
Bepels i334 12eS2eSe2 iseces - WORD 128282, 125252, leSeS2, LeSeS2, 125252, 125252 
O0S6532 125252 177777 -WORD 125252, 125252, 177777, 177777, 177777, 177777 
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overeat 
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aa 
SOR IPEM ERO 


mew 


Sa 
ene 


NN 
ASP Ree! 


NN 


Tautatatautyeutatate autataataiatatatytatyty 


PREPONET OWE O OU ES 
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177777 
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eeent @ onl ond 
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ae 


611 OSKLS CTRL PRTY - 
besbeccy? 1 


0:00 


ee 


fre bat he ee 
ee 
<£ 


eee ? 
<£ 
=r 


—— 
NN N 
NN N 
NN N 
NN N 
NN 





MACY11 30(1046) 
DATA BUF 
177777 
SAMA . WORD 
$9090 ate 
. WORD 
1 WORD 
152116 ; 
13211 . WORD 
oe 
sssss . 
1 S . WORD 
133333 
133333 . WORD 
oseces . WORD 
177777 
135ece . WORD 
072567 WORD 
Orere3 WORD 
1672 
ret § 4 . WORD 
160628 . WORD 
leSesSe 
177777 .- WORD 
177777 
bo0000 . WORD 
ANNNNo . WORD 
. WORD 
. WORD 
. WORD 
.- WORD 
. WORD 
. WORD 
. WORD 
177777 BADPAR: .WORD 
177777 
. END 


L1i3 


O2-DEC-77 10:20 PAGE 167 
FERS 


177777, 177777, 177777, 177777, 00000, Oo0o00 
oco000 , c00000 , Co0000, cOD000, co0000 , coDDc0 
052525, 052525, 052525 , 025252, 0S2525, 052525 
052525, 052525, 121105, 150442, 064221, 132110 
055044, 026422, 013211, 105504, 042642, 021321 
110550, 044264, 022132, 011055, 104426, 042213 
133333, 066666, 155555, 155555, 133333, 066666 
066666, 155555, 155555, 133333, 133333, 133333 
133333, 133333, 133333, 133333, 177777, 177777 
177777 , OS252S, OS2525, 0OS2525, 177777, 177777 
052525, 02525, 177777, OS2S2S, 177252, 177252 
172765, 172765, 072307, 135143, 156461, 167230 
073514, 035646, 016723, 107351, 143564, 061672 
030735, 114356, 046167, 123073, 151453; 164616 
125252, 125252, 125252, 125252, 125252, 125252 
125252, 125252, 177777, 177777, 177777, 177777 
177777, 177777, 177777, 177777, 000000, OO0000 
000000 , 000000 , 000000, O00000, D0000 , coDD00 
“952525, 052525, 052525, 025252, 052525, 052525 
052525, 052525, 121105, 150442, 064221, 132110 
OSSO44, 026422, 013211, 105504, 042642, 021321 
110550, 044264, 022132,011055, 104426, 042213 
177777, 127777, 177777, 177777, 177777, 177777 
177777, 177777, 177777, 127777, 177777, 177777 
177777, 177777, 177777, 177777 

177777, 177777, 177777, 177777, 177777, 127777 
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CZR6DB.Pi1  O2-DEC-77 10:00 CROSS REFERENCE TABLE -- USER SYMBOLS 
ABASE = ‘ 3 1374 
ACDWI eels 77a . 
= 
ACDW2 = 1333. 1377 
0 = i 14438 
ACP fi 1 1348 
= ++ 1 
1 = +++ EE 
i= So000 1333 
1 1333 
ADDI 1333 
ADDW14= 1333 
c= 13 
2 1 
: 
= 
~ 13 
= 1333 
= 1333 
ADDWB = 1333 
= 
ApPver= 1333 1339 
ADEVM = 1333-1375 . 
RENV | = 13331344 
ert: ee ; 
= 
AMADRI1= Dot tom 1 eee 
= 0000 1333 «1368 
AMAORY= OOD0NL 1333 1371 
= 1333368 
= 1333 1363 
IC 1333 1366 
: Be i et 
eres t= i) EM 
= 
AMTYP1= OOOO 1333 1356 
AMTYP2= 1333 1364 
AMTYP3= 1333 1367 
AMTYP4= 1333 1370 : 
APASS = 1333 1338 
APRIOR= 40 10238 1333 
APTesue BoDs4o 67888 6874 
APTENV= 000001 6744 67868 6820 6867 
TSIz= 2276 «=O sé 78S 8 
APTSPO= B78 7878 6869 
G= 133 1346 
ATESTN= 0 1333 1337 
= 900000 1333 1340 
AUSWR = 1333 1347 
AVECTI= 1 10228 1333 1372 ' 
AVECTE= 1333-1373 ' , 
057216 5777-6791 «325903 2S «9025s 
BAI = 000020 10828 


i D 


Se ee 


N13 
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CZR608.P1i1 O2-DEC-77 10:00 CROSS REFERENCE TABLE -- USER SYMBOLS 
garg = 00 10678 , 
nt = 0010 0688 
BITCNT 3262 1S78 1% 2947" #e295Se 29718 4965* 4969" 4975* 4997% #S077% SO8l1* S087* As 
i91# Tb H Se0l* SeeS* 5297% S302e% $311% 5332% S343* $359% $370 378% 490# 
49S# O4*# SSeS* SS4Ox SSS&*# SS67x SS7S5* S694* S6&98% S706* 5$729% 843* 847# 
Sess S878 S983 5987% c99S* 6018 6052 6067# 6088* 6094 6102 7503 33 
ITO = 10038 1064 1097 1116 
IT00 = 93938 1003 
it = 9928 1002 
T0e = 93ie 1001 
IT03 = g308 1000 
i108 = 9838 3939 
TOS = 988a8 338 : 
1108 = 9878 997 
IT07 = 9868 3996 
i133 2 gsSe 39S 6350 
IT0S = 001000 984e 9394 6368 6831 
ITl_ = Q0000e 100e8 1098 
1710 = ede 9838 1069 1088 1107 1140 1155 1211 1226 - 6610 6612 6808 
Tll = 9828 1058 1089 1108 1125 1141 1156 lele 1227 6375 
ITle = 010000 3818 107; 1090 1109 1142 1213 
IT13 = 0000 9808 1073 1091 1110 1126 1143 1214 6606 6608 6815 
iti = aad 97938 i8e2 1092 1111 1127 1144 1215 6336 
TiS = 1 9788 1075 1076 1093 1ll2 1128 1145 1216 
its = 10018 1039 1118 
Ij3 = 10 10008 1081 1100 1119 a 
IT = 93998 1082 1101 1120 1134 1149 1220 6606 6608 
ITS = OO004 93988 1083 1102 llel 1135 1150 leel 
iT8 = 1 9978 1065 1084 1103 llee 1136 1151 1207 le2ze 
IT7 = 0002 9968 1066 1085 1104 1123 1137 11S2 1208 1223 
iT8 = teed 9958 1067 1086 1105 1124 1138 1153 1209 1224 6610 6612 
IT = 001000 9948. 1068 1087 1106 1139 1154 1210 l2es 6575 
BPTVEC= 000014 10108 
BSE = 000200 11048 3398 3466 4064 4608 ¢ 
_ BUFF osSe16 2329 2375 e42e 2468 2514 2561 2619 2676 2730 2785 2928 3019 30 
3179 3260 3339 3421 3439 3620 3703 3790 3893 3997 4101 4206 4332 
4451 4SSS YE4S 4735 4825S 89388 
CALHDR 60) 2615 72 2726 2781 65558 
LR = 100000 10768 2326 2349 2372 2395 2419 e44e 246S 2488 e511 2534 ess8 
2616 2634 2673 2691 2727 274S 782 2800 2832 28ss 288s 23925 3013 
3093 3174 3255 3334 3416 3494 3575 3608 3698 378 3891 39935 4099 
4201 4282 4327 4408 4UY6 4527 4553 4618 4643 4708 4733 4798 4823 
888 4916 5028 5142 Seg S442 S636 $785 $9e5 6307 
CDT = 002000 10698 $33 2343 2379 2389 e426 2436 2472 2482 2518 e528 e565 2575 
CERR 1 10758 3571 4278 4404 4523 4606 4696 4786 4876 
CFmMT = 010000 10728 2333 2343 2379 2389 2426 2436 2472 2482 2518 2528 2565 2575 
0 28le 3503 35le2 600 3624 S644 5793 $933 6573 
CKSWR = 104407 6335 6804 6830 74938 
CLEAR = OO000S 10498 
i | 
CRLF = 000200 9198 e251 6884 6923 
CTO = 004000 10708 , 
CTRHLT 034570 63064 7109 7192 
CYLN 003300 21658 3086* 3095 3167% 3176 3248 3257 3309% 3310 6527 6540 
| 
| 


| B14 
Eerepe Pit Be-bec-7> 10700 © "Y°"** GROSS RerERence TABLE =~ USER SvMGdcs 


BS 


IO 
mort 


25 


#29 QSe 


% S9B S9V999 989 Sa9Ee 


mI 


ee 





, 





zal 
5376 
O4S4ES 


1158 


Nes an ei 


ee ee ee 


PaNor 


Heras 


pepe 


5 @ 
RBSGEes 


ae 
Paani 


el eee oo ee pas ba bos 
Sraatanes 
3 
Te Be 


tS 
— 


on 
o 


ae 


au 


Sees 


78548 


7879 
7581 


7691 
7693 


64218 
Sep 
78 

r] 

738 
S68 


bee 


78198 
78278 


Mm a@ bt 


1972 


84278 
t 


8 
84798 


1470 


SEQ 0170 
e42ese sivee 
B44le 2s 
Sueze 3s 
Sigos | eueis 


1476 1482 
S96 75678 
1984 1990 
=) 1864 
288s 

2080 2086 
7667 7677 
7669 7679 
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ee Pil -DEC- 0:00 USER .S 
Rees h 7671 7390S8 
tae 7673 73098 
1 saige 
1 178 
1 76 739218 
144B 769 79328 
meg 4 1 be 79438 
14, ® e214 22eee 6390% 6807% 
Bisp.a” Solise {3ogs ee1y 2202 
pu ApRRoe 033 


sae 
Stee Zena 
BeSanee tease 
caer 
aint she Ba asta 
a rt 
Each 


i 
38 
gee 
a 
peti eae 


N 
wo 
o 
ra 


ge 
£ 

N 
oruw 
= 
——O 
uw 
Oe 
ou 
tw 
BS 
oo 
an 
N 


6692 6718 72 6722 6723 6724 6727 6728 6729 6730 
fe] = 00000 11168 
DY = ll23s 
ROT = Hy 11 48 
PAR = 1 11008 
DORVMSK= 000007 10808 
B * = OY 11278 
= 17 4 1305 2213 
DTE 11098 
OTYE = G00040 11028 
prose Biewes hes 7S 
DTOO3 42504 14 4 a 1427 1433 1439 144 1451 1457 1463 1469 14 1481 
1383 1333 1384 1262 iS11 1518 152 1S32 1539 1S46 1553 1228 1567 
pros pueses igor tpg} tere dere ieee" rage 
DTO4 BuSeey 1eSt 180° 1pi3 i318 192 1722 1729 1736 1743 1971 1977 1983 1989 
1995 2001 75138 
DTO0S1 042574 1649 75168 
T 1655 49 r] 
T 1 el 1 8 
T 2632 166 1673 1679 1685S 1691 1697 75228 
Brora Buse7a 1oe9 173 1788 1351" 1797 1803 1 1 1827 1839 184 1863 
12eg = fsa Ssthee = teak thaSSCHSPP ERIS «= 1854 1882) i837 = SUF) FEBLs 
‘Be eas on eet te |. ietet ae tae ea 
4 
OT144 042742 2007 2013 2019 2025 2031 2037 2043 2o0ss 2061 2067 2073 2079 2085 
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CZR608.P11  G2-DEC-77 10:00 CROSS REFERENCE TABLE -- USER SYMBOLS 
Pika BeZ90E £031 Ht s398(s444)—'siSSO0G0Ofss«CSS3S)=Ss«CiSS9S)=ssS931 0s 9960s ; 
ESSE" BaSsze 3184s e3S, S868. 8662 S6i. R42 b9dE. 2 5993" es92 «6598 


= 


ne 
R= 


Nees, 
ses Se 


— 
£ 
a 


sst5 
mE oe 


Ee 
& 

x™ 

& 

4 

e 


FEEL? = BECE flese 
| sc 


S 
' ECCXOR 7 21618 
— 30 


*  SSGex S$70S* ses4# s994"% 6602# 6607 
se ee ee OR BOR 
1 364 C452 S 5561 


11038 
001310 isois Goes caves 72% 8e* 186* 20e* e96* 5$310# 3428 S# S4eg9#  5S503* 
eh SS66# ibs 36# 838% 25eSs esse 5978* 999% *# 60328 6063 
: * 3# 66S7# 6684 6697*% 
S 


age 

if 
aos 
wes 


1396 486 79488 
EM300 046156 1407s: 1413 1419-79558 
rape OMESIT wag ag 48S 90K 
3 +4 iMel tue? 147358798 
| EM304 446 1479, 148S)—Sssd14910Sss 798878 
, EM305 Ses 1497, 1503 1809 79958 
-Eap? Eee igaeieo ‘ 
i , 1 is65 si 5 # 
praig | Buze 153g Ie Tei?" ees ees 635164116472 
| Ente 047342 1668 1671 B0688 
M 1 I 128 Ba. 1720 =. 81008 
EM31 047663 1727 1734 1741 81078 
EM31 047761 1747s: 11753 1789 81 Sa 
Fr 050020 1765 17 17 i 2133 
M Oe 17 17 1 1 1328 
M3el is 1813. «181 1 1831 1418 
EM3ee 050241 1837, 1843. ss«1849Sss«18SS5 Ss 1508 
ciaes Babs? ie ies; lee? 183 lest 
aes Deoeie 1303 181s 18211327 Bias 
EM3e6 3860S 1933 19 1945 1951 81898 
M327 7 4 7 2186 2296 283 cs6s9s—is@3e=s«éS97~—s« 1988 
n or W978 ae i S03 8205s 
En 1098 1863 88208 
EN331 051138 1369 1975 1981 g2268 
EMSs «821585 e302 38s bee BSUS 


—_— ee 
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Cc -Pil Be<beC=7? 10:00 CROSS REFERENCE TABLE -- USER SYMBOLS 


2041 
£038 Besos 2083 2089 82728 
o 


ee 
3 


HeBs 
ReSe 
BH 
s 


No 

Ww 
“ 

WRG 


10] 
M4000 1408 1426 1444 1462 14 1498 1517 1538 iss9 1 1906 1654 4708 
ice roo oy 1790 1814 1838 1862 1886 1910 1934 19 1988 
Em4001 vy 1414 14 1 ie 1486 1504 83128 
Em400e 133 14 1 re 14 14 44 1510 83158 
M4 el 1Se4 1 S66 1587 igs 
213 1eoe 
1 1 1 4 
1994 


a 
75 1796 1820 1844 1868 1892 1916 1940 1976 
802 


g 
3 
a 
et] NUwWI£ 
roe 
cae. 
ae 


003 
mY 
MY 
. | 
E 7 4 161 goes 83338 
ErNog Beesbe 1650 83418 vow 
10 355 1 r 
migie Beseee tive Bees 
EMYO1 1 1784 1808 1832 1856 1880 1904 1928 1952 83698 
14 1 1678 1690 204e 3768 
1s 1 1 1696 2036 2084 3818 
m4 16 27 1 22 83878 
1 1564 21 83908 
ERRCNT 1S28 2230% 10x 651 
| raves seis ye pouse 2211 lee e2223% G625i* 6252* 6279 6280% 6341 6342e 6344" 6347 
E. BA 003204 e1e3e * 1 P 4 59s* 7509 7538 
.CS1 003200 1278 43% * * 248e% 31 25" 78 
2610 2 7% 7 7elx 7. 742 s 3 10 
See Pt 385 Py # 64s 67 le* 
rhe 70% 3571 7 % 749 ry 2 * 
40 wOso 4114* 4154 4219% 4 4277% 4278% 42ee86e 4287 4345* 4386 4403* 
GHQ4x 44 12% 4413 44B4* 4 6 3% * 4532 % 60 ugs5" essa. 
Ph ars e673 708? ers, aia Peon feng es ae 
E.cSse 003210 si 718 % S528 sont 2396 san08 * 3 3465 3470 s7i3* 35 3301" 
366 * * 3846 # 3383 1l# 4053 9115" 41 42208 4263 
eucs" ¢ a Lge tS 4607# 7eh8 7528, pl 4787% 4792 4677# 4882 S390 
E.DA 003206 21308 * suc 66 ae 2701% e7 2720% 2732 2755* 2756 2775* 2787 
| 2190. 2 el 3206 ace S18 SSo4* 15 6541% 6542e* 6543 654S* 6546* 6547 
E DEYL 3555 51328 ogs Sea0 oP ae 2645 2648 2665* 2677 2719% 2731 774% 2786 
74 3143 3224 3305 5396% 5415 5593* S612 6540 6550* 6556 7522 5259 
E.ps 381 21328 
E.ECPS 21408 
E.ECPT 003234 214i8 4977% 4994 5108 S222 5329 5522 S726 5975 6015 6049 610S* 6107 
6614* 6615* 7533 S41 
£.ER 003214 21338 2851* 2867 891 3384* 3391 3466* 3473 3514* 3559 3569* 3602* 3671 
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CZ2P6DB.P il Oe-DEC-77 10:00 CROSS REFERENCE TaeLe 


374% S 3805 3908* 3952 4o1es 40S 4O64# 4116s 
4 m * 443478% 4 A * 2 ayy 5 
738 ueoBe | dees oe : 1 
E.MR1 003224 21378 * 2984 + ‘ » 7% 
54 * eLs 4164 4 A ME bd 4 44678 aei5 
codes * 4s S492e SS30e SSbi* S695 4x S9e4e * 
oer" 6631% 6636% 6640 66 6654 66728 66778 6681 6690# 
E.MR2 003226 1 ge ees 2e3s2 si 2 2398 gua7e e445 = 248 24911 2529% 
E.MR3 003230 e037, 34S* 2958 1 teh e438 e4y4e = 2484* )§=— 2494 = 2S 308 
SPAR 0032 th wats,” “soahe: 7 
Ec _ 9032 2126s 2849s 2864 5399 S4i2 S596* 5609 7509 «= 7838 
GNS = £2EeRH U 1183 a3 37 134 141 748S 7486 7487 7488 7489 
- = rose ae" 70 42 4403 See 4606 4496 4786 4876 $389 
HDRCNT 331 4 6s 3 * 3807 3856" 3910% 3959  4O014« 
§2 3 ase 3333, 3358 4349s 4339% bg 4468" 4471 
ADER 003302 2 97 ? 6527" 6528* 6529% 6530% 6531" 6532% 
eisee = pu18, 2232 «EB 


AIO 923364 Gepe wee uBue 3038, 5164 5270 S463 8486s 


TEERERRRRA 
oletetetetsta 
we 
isi 
BeNaaee 
wea 
Fa 
at 
a 


44 4003 
= ll 413, 
HVRe = 11058 3602 3748 4168 4276 4402 4521 4698 4788 4878 
= 
IE = 000100 10658 
lf = 1 10378 
INCHOR 62 3173 3254 65278 
INTR = 000300 10608 
nes Bente pois «Shes | S3B" ag 6 3513 3601 747 «3804 ~«= 3907 
4346 46 Seno eg? 3B yar? «B90 Sa? 
LF = ooonle 3178 6917 6923 
MCLK = O00400 11388 12098 2336 382 2429 475-2521 ~—Ss« BSB 2681 
3u3ge = ies" §=§338 103 183 G 6893s «uesSsS808 0S S26 
wees casesisTgSCi‘étS?:C(‘<‘é‘éiawSCOCSSCgETGCESCsCSSGCiégg 
eesti B43; BS 385 = B34 
MDS = 001000 10878 
MEMBAS= 172100 10198 6181 6193 6219 6254 
MEMERR 034526 1162 1253 6229 62908 
MEMPAR 003274 Bless §763 6182 6194 6220 6253 6259 6263% 6274% 6281 
MEMVEC= 000114 10i8e 1181 1253 202% 259% 6230x b2eax boBue 
RD = 001000 11398 12108 6721 6729 
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STE Oe tt Bakke CIS bt od se ee ker ERENCE TABLE ~~ USER SYMBOLS 
MESMSK= 000017 
MEWO = 002000 11408 12118 - 3960 «40 411742 4 
a 
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